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則 還 コイ エー つろ ご この RE 還 1 さこ 1 お 頭 


は じ め に 


書 は , フラ ミコ ン を 手 に し て , も うど れこ くら いた だ ち ま す か や ゲー ムカ セッ トド は, 何 本 く 
らい 持つ て いま すか や その ゲー ムカ セッ ツ ト で 遊ぶ こと だ け で , 満足 し て いま すか 

お 店 で 売ら れ て いる ゲー ムカ セッ ツ ト で 遊ぶ の も , 楽し いこ と で す が , 君 自身 の まで , 君 だ 
け の 新しい ゲー へ を 作 つ て みた だい と 思 つ だ こと は あり ませ ん ガマ 

「 だ つて , ベー シッ は 難し いで し よ !?」 
いい え , そん な お 事 は あり ませ ん 。 ご この 「 フ ァ ミ コン ソフ ト 集 の 9 の 1」 に 載 つ て いる プロ 
グラ ハム を , 打ち 込ん で みて 下さ い 。 

「 フ タラ ミコ ン は , メモ リー が 少な く て , お も し ろ い ゲー ム な ん か で きつ こない ヨ 」 
本 当 に そう で し よう か ゃ メモ リー が 少な こく て も , 君 の 工夫 し だ いで , お も し ろ い ゲー ム は 
だ ぐさ ん 作れ ます 。 

と の 「 フ ァ ミ コン ソラ ト 集 。 の 1」 は ,。 友 つ だ 1982 パ イト し か な い ノ ファ アミ リー ペー シ 
ッ ク で , どれ こく らい おもしろ い ゲ ー ム が 作れ る の ガ , と いう 事 へ の 私 だ ちの 答え で す 。 こ に 
こぐ, まず プロ グラ ハム を 打ち 込ん で みて 下さ い 。 そ し て , 「RUN」 と 症 令 し て 下さ い 。 ご 


ん な に いろ いろ な ゲー ム へ が , こん な に 短い プロ グラム で で きる の ガ , と ぴっ つこ ぐり され る ご こと 
あと ゃ ep の 

プロ グラ ム を 入力 し て いる と , きつ と 

「 あれ, ご こ で な ぜ こ ん な お 事 を し て いる ん だ ろう ゃ 」 
こ 恵 つう こと も ある で し よう 。 そ うな れ ば , し め だ も の で す 。 そ れ は , 君 の プロ グラ ム 能 力 が 
上 達し て いる 証拠 だ びら で す 。 

ノア ミコ ン は , 私 だ ちの 友達 で す 。 ゲー ムカ セツ ト で 遊ぶ だ け で は な ご <, も つと も つと , 
ファ アミ コン の 可能 性 を 引き 出し て あげ て 下さ い 、。 

「 フ アミ コン ソフ ト 集 」 は , この 「 の の 1 」 の あと , 「 の 92」「 の の 3」…… と 続き ま 
す 9。 ノ ファ アミ リー ベー シッ ツ グ Ver.3 を 使 つ な 大 型 ゲ ー ム も 登場 し て きま す 。 

ン ア デニ リー ペー シッ 0 ん 人 問 全 こさ こし と パャ シッ ンク ホッ アフ チッ プリ ジャ ンプ 」 
と 共に , フ ア ミ コン と 書 の そば に お いて 下さ ざい 。 

姓 こ , フラ ミコ ン と , 私 だ ちと で , 君 の 新しい 可能 性 を 開き まし よう 。 


19856 年 5 月 
地球 防衛 軍 スタ ダッ フー 同 


ブ プログ ラム 打ち 込み 上 の ご 注意 


人 ダーム ヲ 回 ラム 久 
FLYFIL YY ラル イタ ー ラ ライ の 総 攻 撃 ノ スタ ー シ ッ プ 危 うし 6 
アス テロ イド  。 参 際 な 着 隆 に 挑戦 フス ター シッ プ の 手動 操 総 だ ] 4 
FLYFALL た 』 た ラッ イタ ー ラ ライ の し っ こい 紅 閥 の () 
コマ ンダ ー まわ り じ ゅ うか ら の 攻撃 を か わし な が ら 反 茎 だ ノ 6 
いも 中 ご ろ ご の) 3 を 信 べ る と と ん と どん 伸び て いく いも 虫 だ 32 
カメ レー スズ イド トン. カメ が 走る 走る 。 いや 歩く 本 命 は 何 番 ? 36 
チッ クタ ッ ク BOIM HH - タ = タ が ハッ スル 。 肖 げろ 一 44 
マリ オ で ジャ ン ケ ン リオ は レティ より 整い 。 何 を 出す ? 50) 
MARIO KICK ッッ Ecxssr 56 
ライ フ ゲ ー ム ん 。 生物 が 生存 する た め の パ ター ン と は 一 体 何 だ ? 62 
ラリ ー 方 向 転換 が むず か し い 。 ハ イス コア ー は 運転 技術 か ら の)89 
ガー ル ハ ント 馬 和 の 名 前 を まち が える と 大 変 だ 。 早 探せ ノ 74 
MOUO 隠さ れ た 数 字 は 何だ 。 じ っ くり 考え て ぴっ た り 当 て ろ 6() 
中 上 F ロ 上 CT 1OIN ドー ルド ポール は ね 挟 っ て と こ ^ へ 行く? 6 


分 回 画 ず ー タ ダー 時 


FLYFLY BG 95 
アス テロ イド BB ば 96 
FLYFALL B 97 
コマ ンダ ー BB 98 
カメ レー スズ ス 日 じ 99 

ッ ク タ ッ ク ツク BOMB BG 100 
MAHIOUKICK BG 101 


ラリ ー 
HEFHECTION BG 
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ご の ソフ ト 集 の 
6 入 み 上 の 
: 注 間 


プロ グラ ムリ スト は 。 ファ ミコ ン 上 で 動作 し て いる も の を , その まま プリ ント アウ ト し た 
も の で す 。 
みな さん も 知っ て いる 通り 。 愛 アミ リー ベー シッ ク Ver.2 は ぱ , フリ ー エ リア が 2 キロ 静 
し か あり ませ ん 。 を の た だ ため, ゲーム を 作る の に 非常 に 苦労 し て いま す 。 
本 当 は ベー シッ ク の 命令 は ,。 で きる だ け ス ペー ス (空白) を あけ る 方 が 見 や すい の で す が , 
スペ ー ス 一 字 分 で メモ リー も 1 バイ ト 減 っ て し まい ます 。 それ で 

GOTO 2 が が 

PRINT “TEST 
な ど と いう 行 は 

GOTO29 の 

PRINT “TEST" 
に 0 みよ の に た AV e 庄 きめ て いる ブロ グラ ム が あり ます 。 こ うい う プ ログ ラム の 場合 , リ 
スト 通り に 打ち 込ま な いと 

?0M ERRORKR 
と いう エラ ー を 起こ し ます 。 こ れ は , メモ リー が 足り な いと いう 意味 の エラ ー で す 。 
の 

生計 1 も 多 A/ 

1FA ニ 1REKTIUEKN 
と いう よ 肝 台 行 粘 出 て きま すか こっ 牧 全 

IF A=1 THEN ERA 7 

IF A= テ 1 THEN RETURN 
と いう の が 正しい 書式 (プロ グラ ム の 書き 方 ) な の で す が , 実は ファ ミリ ー ベ ペー シッ ク て は 
「THEN」 を 省略 し て も , 条件 式 の 後 の 命令 を 実行 し て し まう の で す 。 ( 他 の パソ コン で 
は 。 と こう は うり ま て (いま まん ル ) 

『Aー10KB ニ 1PRNTNTIA 
と いう よう に AND, OR で 条件 式 を 結ん で も 大 丈夫 で す 。 こ うす る と , ブロ グラ ム の 長 る 
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が 1 バイ ト 減 る わけ で す 。 ふ つう , 他 の パソ ュ コン で ブログ ラム を 作る 時 に は お すす めで きま せ 
ん が , この ソフ ト 集 の プロ グラ ム を 打ち 込む 時 は , リス ト 通 り に し て 下さい 。 
まだ, この 他 に も 
IFMOVE (9⑰) 一 
人 5 ルー (5 デー3)、 吉 攻 や ー デ 
と いう よう な 書き 方 を し て いる 所 が 、 いも つか あり ます 。 
これ は 。 た と えば 
スー2・ 世 ーー (Amw2 ラ 2) 8 代 よ 内 3 ね 
A デ 2 : 母 e (AA デ を 1) ) せ 長 ま NII 
と それ ぞ れ , ダイ レク トト で や っ て みて 下さ きい 。 
カッ コ ( ) の 中 が 正しい 時 は 「 一 1」, まち が っ て いる 時 は 「 ヂ 」 か 「B」 に 代入 きれ 
て いる の が 。 わか る と 選 に ます ず 。 を れ を 利用 し た 書き 方 て す 。 で し る 
IF 一 - THEN 
と いう 文型 で は 。 「- 一 」 が 正しけれ ば 「THEN」 以 下 の 命令 を 実行 する わけ で す が , 実 
は 「 ニー 」 の 中 が 正しい と いう 事 は ,  「- こ ご 」 が 「 一 1』」 で 孝 を いう 事 な の で す 。 そこ で 
IF A THEN 一 - 
と いう 書き 方 を する と , 「A= テ ー1」 の 時 「THEN」 以 下 を 実行 し , そう で な い 時 は 実行 
し な いと いう 意味 な の で す 。 

両方 と も , ブログ ラム の 作り 方 と し て は 正しい の で す が , あと で プロ グラ ム を 見 直す 時 わ 
か り ず らい の で , あ まり お すす めで きま せん が , メ モリ ー の 節約 に は 有効 な 手段 で す 。 

な お ,。 プロ グラ ムリ スト の プリ ント アウ ト の 都合 上 , この ソフ ト 集 の プロ グラ ムリ スト で 
は 。 「 ば 」 や 「 ば 」 は 「 は 」「 は “」 と 2 字 分 の スペ ー ス に な っ て いま す が , 「 ば 」「 ば 」 と 
1 学 で 入力 し で 下る きい (この 2 池 と し] の 中 い に つい て は 。 「 フ ァ ミ リー ベーシック ジャ 
ング 」 編 で 説明 し た いと 思い ます )》 

プロ グラ ム の 入力 (打ち 込み 方 ) や 修整 の や り 方 に つい て は , 「 フ ァ ミ リー ベー シッ ク 
ホッ プ 」 を 参照 し て 下さ い 。 


人 間 が 生存 可能 な 環境 を 持つ 小惑星 "S3612-09"。 平和 を うに 見 えた この 世界 に 思い が け な 
い 危 険 が 隠れ て いた 。 地球 か ら の 調査 隊 が 地球 の ハエ に 似 た 生物 「 フ ァ イ タ ー フ ライ 」 の 攻 
撃 を 受け て いる らし い 。 調査 隊 を 救い , 基地 を 作る た だ ため の 増援 と し て , 地球 か が ら 「 ス ター シ 
ッ プ 」 が 発進 し た 。 と ころ が 小惑星 が 近づい た 時, ファ イタ ー フ ライ の 攻撃 を 受け て し まっ 
た 。 プン プン 飛ん で 来 て 体 当り を も かけ て くる と は …。 フ ァ イ タ ー フ ライ が ぶつ か る だ びに 「 ス 
ター シッ プ 」 の 燃料 が 減っ て いく 。 こ の まま で は , 着陸 に 必要 な 燃料 まで 失っ て し まう …… 。 
オォ オッ , あれ は 小惑星 か ら う ち 出 し て くれ た 燃料 ユニ ッ ト だ 。 やれやれ 。 

うわ っ 。 了 大 石 だ ク あん な の に ぶつ か っ だ た だら お し まい だ ……。 


文 遊 び 廊 


プロ グラ ム を RUN きせ る と 

PUSH START BUTTON 
表示 が 出 ま すか ら , コン トロ ー ラ ー 1 の START ボタ ン を 押し て くだ さい 。 

ゲー ム が 始ま る と 「 ス ター シッ プ 」 が 表示 され ます 。 こ れ を コン トロ ー ラ ー1 の 十字 ボタ 
ン で 左右 に 動か し ます 。 宇宙 空間 で すか ら , 動く だ ため に は 移動 用 の ロケ ッ ト エ ンジ ン を 使い 
ます 。 こ れ を 1 回 使う と (キー を 1 回 押す と ), FUEL が 1 減り ます 。 さ る ら に 一 度 動く と , 逆 
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ブロ グラ ハリ リス ト (Be 画面 デー ター は 95 ペ ー ジ ) 


1 の の CLSgCGEN2CGSET1』SFRITEHN』 VIEM 

11 の の PALET 5 2.47。4H.2Z1 1 ピロ 

12 の PALET 8 くさ,47。4 ピ 8 , 39 , 2 ン 2 

1 の DEFSFPRITE の 。( の 。1 の 9。 の 9 の)m リ EY フ PP ポ の 

149 DEFSFRITE1 。 (の 。 1 。 の , の の) =CHR も (1B の ) + じ CHR も (181) +CHR 
も (182) 1 じ HR 和 中 (1 日 さ ) 

15 の FL=1 の SGP=2 の 2 ュ F エ =5 の 』 NT=15 の 

さる 99 LOCATE9。1 の FRINT "PUSH START BUTTUN!“ 

さ 1 の IF BTRITB( の 2) く >1GOTOUS10 

さ 2 の 58C じ = の の! GH=2 ロニ クン 5 の の 

4 の の V= の riFU= さ の の II CX=128 ビ 』 VITEM 「 

41 の 9 GOUSUB さ の 2 の の 』 GUSUB さ 1 の の: GOSUB さ 2 の: GUSUB さ さ の の 』 SFPRTITE 


42 の 9 FORI= ウ TO5』FPOUBSITIONI 。 の , の :NEXTsFOBIT TUNS 2 らら 。 だ らら 


ら の 9 IF BTRIG( の ) =BGUSUR10 の 2 
1 の 9 S=STICK(2)』 IF FUm の BOTOUS4 の 
5 ら 2 の IF =1 THEN V=V+2 ョ FU=FU-1』 GOTOS4 の 
さり IF B=2 THEN ソ = ソ ー< ュ FU=FU-1 
ら 4 の 2 CX=CX+V』 GHSUB さ 2 の の 
93239 JF CXG16 「IHENM LXS16 
ら 6 の IF CX>144 THEN じ X=144 
ら / ウ BFRITEM し LX 120 
ら SB IF XFPOUS(6) く 2559 AND MOVE(6) = の THEN ERA6gFUSTITIO 
NG6 , 255 ,、 25 ら 5 
らら 9 の FUR Ieg TO 
6 の IF ABB(XPHS(1)- ビ 75 く 12 QRND ABS(YFHB(T)-129) て 16 
GUSUB25 の 0 の 
FLYFLY 9 


方 向 に エン ジン を 噴射 し な い 限 り 。 いつ まで も 止ま り ま せん 。 し だ た が っ て , あま り 激 し く 動 
〈 と す で 燃 料 が な く な っ て し まい , 姿勢 制御 が 不可 能 に な っ て し まい ます 。 
敵 を 攻撃 する た め に は , コ ユ コントロー ラー の A ボタ ン を 押す と タマ を 発射 で きま す 。 


文 画 面 に 現われ る キャ ラク ター 


@ フ ァ イ タ ー フ ライ 

画面 の 上 か ら 6 下 へ , まっ す で 飛 ん で きま す 。 ス ター シッ プ に ぶつ か る と FUEL が 10 減 り ま 
す 。 撃ち お と す と 10 点 で す 。 
⑱ ニ タニ タ 

画面 の 右上 か ら 左 端 ま で , 横 に 移動 し ます 。 敵 の 偵察 部 隊 で , 撃つ と 10 一 100 点 で す 。 
スピ ナー 

味方 の 燃料 ユニ ッ ト で , 回 収 す る (ぶつ か れ ば いい ) と FUEL が 50 増 えま す 。 
@ フ ァ イ ア ー ボ ー ル 

頃 石 で , 画面 下 か が ら 上 へ 移動 し ます 。 こ れ に ぶつ か る と と スター シップ グ は , や られ て し まい 
ます 。 破壊 で きま せん 。 

スタ ー シ ッ プ グ は 3 隻 , 燃料 は 300 で す 。 得点 2500 点 ご と に スタ ー シ ッ プ が 1 隻 増 えま す 。 


文 ブ ログ ラム の 説明 

100^ 初期 設定 

500-- メイ ン ル ー チ ン 

1000-- タタ マ 発射 

2000-- 各 キ ャ ラク ター 出現 , 移動 

2500-- 衝突 処理 

3000-- 得点 , FUEL な どの 表示 

3500-- GAME OVER 

プン ロイ ラク な 分 。、 あい あと 上 ト ゆ の よう せり ます 。 メ イン ルー テン そ を 人 キー 入力 , うろ 
ター シッ プ の 移動 , 衝突 判定 を 行 が っ て いま す 。 キー 入力 を 調べ (510 行 )、 それ に よっ て を 
の 回 の 移動 量 を 決め (520 一 530 行 )、 スタ ー シ ッ プ を 移動 る きせ ます (570 行 )。 

捕 回 の 移動 量 は 変数 V に 入っ て いま すか ら , 移動 を 遅く (反応 を に ぶ ざく) し た い 時 は 540 行 の , 

CX テ CX 十 V 

の V を , 適当 な 数 で 割っ て や り ま す 。 
衝突 の 判定 は 座標 の 比較 で 行ない , 衝突 が 起こ っ た 時 は 2500 行 か ら の サブ ルー チン に 飛び , 
ここ で で 衝突 し た 物 の 種類 に 応じ た 処理 を 行ない ます 。 
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61 の IF XPOS(T)-6<XPDS(6) AND XPODS(T)+14>XPHS(6) RaN 
D YP0S(1I) -B く <YPHB(6) AND YPOB(1I)+16>YPHS(6) GOSUB15 
の の 

62 の IF XPDS(1)= BUSUE299』 GUTD64 の 

6 さ の IF NOT MDVE(1I) THEN ERAI』POSBITIUNI , の , の 

64g NEXT』BUTD5 の の 

1 の の の IF MOVE(6) THEN RETURN 

1 の 1 の DEFMDVE(6) =SPRITE(12。1 。1。 昌 1 の 。 の 9) 』FHBITI ロ N6 CX 
+4.11 ン 2 

1 2 の MDVE6』 RETURN 

15 の の IF 1I> ス THEN RETURN 

151 の 9 IF I> の BUTU15 さ の 

152 の 9 J=RND(6) 1 の +5 の LOCATE19。14』PRTNTJI" "5BCm (BC+ 
りー19) DD さ 276 の 

15 さ の ERAI 』6』POBITIDNT , の 。 の iPODSITION6 。 255 。 255 

154 の BC= (BC+1 の 9) MDD さ 276 の 』 BDSUB さ の の 

155 の 9 IF BC>mB THEN BHwBH+1』 BUBUB さ さ の の Bm (B+25 の の ) IOD 
さ 25 の の 

156 の 9 RETURN 

2 の の の UNI+1BOUTD2 1 。291 の 2 の 1 の 2 の 1 の 。294 の 。27 の 

2 の 1 の IFRND (FL) >9 THEN RETURN 

っ 2 の DEFMDVE (1 ) =BPRITE(2 5。 1 。BB。 の 42) 』FUBITIHNI 。RND 
(129)+16。24 

2 の さ の MOVETI』RETURN 

2 の 949 IFRND(SP) >gTHEN RETURN 

っ の 5 の DEFMOVE (1 ) =BPRITE(7。 呈 。 さ 。BB。9。1) 』PDBITINI ,RND 
(128)+16。24 

2 の 6 の MOVET』RETURN 

297 の IFRND(FI) > の THEN RETURN 
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ある キャ ラク ター が 移動 し て いな い (画面 に 現われ て いな い ) 場合 に は 2000 行 に 飛ん で , 乱 
数 で 出現 を 決定 し ます 。 出現 の 確率 は 各 キ ャ ラク ター に よっ て 異な り , それ ぞ れ の 変数 に し 
まわ れ て いま す ( 変 数 表 参 照 )。 処理 の 開始 行 は ファ イタ ー フ ライ (2010 行 )、 スピ ナー(2040 
行 )、 ファ イア 一 ボー ル (2070 行 ), ニタ ニタ (2100 行 ) で す 。 

買っ だ タマ が 何 か に 当っ た だ 時 は 1500 行 に 飛び , 対象 が ファ イタ ー フ ライ か ニタ ニタ が なら, を 
の キャ ラク ター を 消し , 得点 を 加算 し ます 。 ニ タニ タ の 場合 は 得点 は 乱数 で 決め ます (1520 行 )。 
文 プ ログ ラム の 改造 

この ゲー ム の 場合 , 改造 と いっ て も 変数 の 値 を 変え ん る くら い だ と 思い ます 。 ゲ ー ム バラ ン 
ス を くず る な いよ うに 修正 で きる の は , 次 の 2 つ で し ょ 2。 
① スタ ー シ ッ プ の 数 320 行 SH 
② キャ ラク ター の 出現 度数 150 行 変数 表 参 照 

また だ た, スタ ー シ ッ プ グ 以 外 の 移動 スピ ー ド は , 各 ス プラ イト の DEF MOVE 文 を 変え れ ば い 
いで し ょ う ( 表 参 照 )。 


文 用 数 表 


CX スタ ー シ ッ プ の >xX 座標 

V スタ ー シ ッ プ の 移動 量 
SH スタ ー シ ッ プ の 数 

FL ファ イタ ー フ ライ 出現 度数 
SP スピ ナー 出現 度数 


値 が 小さ い 程 ,。 現われ や すく 〈 く な る 。 
FI ファ イア ー ボ ー ル 出現 度数 E 


NI ニタ ニタ 出現 度数 
SC スコ ア 
HS 。 ハイ スコ ア 
FU 残り 燃料 
スプ ライ ト 番 号 定義 し て いる 行 
0 ニタ ニタ 2110 行 
oe つの 2 プル ポー ンチ 2020 行 
4 スピ ナー 2050 行 
eK 0 本 2080 行 
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1 


LH HH 
由 
3 


さぶ ウ (の 切 


DEFMDVE (1 ) =SPRITE ( 呈 。 1 。2 BB。 の 9。 さ ) FUBITIONI 。CX 。 


MOVE 1I』 RETURN 
IF RND(NI) *@ THEN RETURN 
DEFMDVE( 1 ) =SFRITE(11』7。2。64.9。 さ ) POSBITIONI 。14 


MOVE { s RETURN 
DN1I+1BUT0D251 の 9 。251 の 。2 ロ 1 の 251 。 52 。 255 さ の 
FU=FU-1 の 』 IF FU THEN FU= 

BOSUBS2 の 9 RETURN 
FU=FU+5grERAIPDBITIDNT 』 の の BUBUBS2 の 』 RETURN 
ERA の 。 1 。2。 さ 。4.。5kBPRITEI BPRITE1 。CX 。 1 29』 H=GH-1 


PO0SITION5 , の 9, の 』 FDRJ= ウ TD999』 NEXT 
IF SH= の THEN RETURN さ 5 の の 
RETURN4 の の 

LOUCATE19。6: FRINTSCI RETURN 
LOCATE19』2sPRINTHS』RETURN 
LOCATE19。11』FRINTFUI" "iRETURN 
LOCATE2 の 。19』FRINTBHI" "rkRETURN 
LOCATE5 5』PRINT "BRME VER" 

IF SC>HB THEN HS=SC: BUGBUB さ 1 の の 
GOTD さ gg 
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宇宙 空間 で の ファ イタ ー フ ライ の 攻撃 も か わし て , いよ いよ 小惑星 が 近づい て きだ 。 だ が , 
ファ イタ ー フ ライ と の 戦い で 自動 着陸 装置 を は じ め , いく つか の シス テム が 壊れ て し まっ た 。 


し た が っ て 小惑星 へ の 着陸 は マニ ュ ア ル (手動 操縦 ) で 行なわ な けれ ば な ら な い 。 し か も $ 最 
初子 定 し て いた 着陸 地点 まで は , 自動 装置 な し で は 行き つけ を そう も な い 。 手近 な 所 で 比較 的 
安全 な 地点 を 探る なけ れ ば …。 

ょ し 。 あの 辺 に 降り よう 。 多少 危険 は 区 り を うだ が , この 際 し か た が な い 。 何 カ所 か 平 6 
な 範囲 も あり を そう だ 。 

し か し ,。 燃料 が も う 残 0 り 少 なく て な っ て いる か ら , 進入 の や り 直 し は で きそう も な い 。 こう 
な っ た ら 6 一 発 勝負 に 賭け る し か な る そう だ / 
文 ゲ ー ム の 説明 

昔 ゲー ムセン ター に あっ た 宇宙 船 の 着陸 ゲ 一 ム ろ の ファ ミコ ン 版 で す 。 

プ ブログ ラム を 走ら せる と 

PUSH START BUTTON〆 

の 表示 が 出 ま すか ら ,。 ユ コントロー ラー の スタ ー ト ボタ ン を 押し て くだ さい 。 

ゲー ム が 始ま る と, 画面 に 小惑星 の 地表 の 様子 が 出 ま す 。 中 に 4 カ所 曰 い 部 分 が あり ます 
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プロ グラ ハリ スト (BG 画 両 デ ー タ ー は 96 ペ ー ジ ) 


1 のり LLSiLBSGE| 1 1LiBFRKIIEUN 

11 の ウ DEFSFRITEO。( の 。1。 の 9 の 9)= リ デー トド リド 

120 DEFGPRITE1。、(9. 1. の 9 の. の 9)an フィ ロン 

1 さ の DEFSPRITE2。( の 9。1. の り 。0.、9) ョ ヒビ ソ ブタ ペ ポ 7 

14 の DEFSPRITE さ 。( の 1 4919)= リ の 0 の リロ P ロ ポー 

15 の DEFGFRIJTE4。( り 9.1.9.1。 の = ト テヒ リコ 

1555 DEFSPRITE5。( さ 。 の 9. の の, の ) =CHR ま (21 さ ) 

156 DEFSPRITE6 。( さ 。 1 。 の の 9, の ) =CHR も (176) +T じ HR 和 も (177) + じ HR 
も (178) +T じ CHR 和 も (179) 

157 DEFSPRTITE7 。 ( さ 。 1 。 の のり, の 9) =CHR も (1B の 9) +CHR ま (1 フ 1) +CHR 
も (1 コ H2) +CHR も (1 日 さ ) 

16 の 9 DIMFX(4) 。FY(4) 。LS(4) 

179 FORI= の TO4:READFX(I) 。FY(IT) 。LS(I)sNEXT 

18 の 9 DATA15.4.20 の 9.12.12.211 29.16.21 う うう 12 21 1 ,-6,4 
。 メリ ソン 

2 の 9 の PALET B の 。47。48.48。4 昌 VIEM 

ら じ = の の: Z= ク 2 ョ ソソ = テ の ウ の ュ F ト =1 の の の 

LCATE 5。5:PRINT "FUSH BTART BUTTUN!! 

2 IF SIRIB( の < っ > っ 1 BUIU 230 

VIEM 

HD=2』 り X= り 』 ソリ Y= い りり 』 り = り +2 ョ Xn6 の OXZ』 Y テ = ジオ 4%Z 

1 の FL=F: エ FF > の の THENF= ド ー90 

5 の LTDATE 10.22」FRTINT'BLUREa 1 し 

1 の の 29 LOUCATE の 。21:PFRINTPXmTIVUX』" YemViVYi | FUEL テ "IFLI 
1919 KR=STICK( の ) 』 IFFL= の ORK= の ORK >2THEN1 の の 

1 り 215 SFRTIEHD 

1 の 2 IFRK=1THENHD=HD+1』 IFHD>4THENHD=4 


| 


し 4 ト KJ 
SS 


トド 
むう 


CH h ト ) h) 


ls 
ee 
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が ,。 これ が 着陸 可能 な 範囲 で す 。 を その 下 に ,※X※ 1,X 2,X5 と ある の は , 着陸 地点 の 難易 度 に 
よる ボー ナス て > 

同時 に , 画面 左上 に スタ ー シ ッ プ が 表示 る きれ ます の で , コン トロ ー ラ ー で うま く 〈 姿 勢 制御 
を 行ない , 上 手 に 着陸 地点 まで 誘導 し て くだ さい 。 着陸 地点 以外 の 所 に 接触 する と , スタ ー 
シッ プ は 爆発 し て し まっ て ゲー ム オ ー バ ー に な っ て し まい ます 。 

ス . タ ター シッ プ の 誘導 の た め に , 姿勢 制御 し ロケット 噴射 を 使い ます 。 姿勢 制御 の た め に は , 
コン トロ ー ラ ー の 十字 ボタ ン を 使い 。 スタ ー シ ッ プ の 向き を 変え ます 。 一 回 の 姿勢 変更 は 燃 
料 を 5 ユニ ッ ト 消 費 し ます 。 ま だ た, コ ユ コントロー ラー の A ボタ ン を 押す と ロケ ッ ト が 噴射 
れ , これ は スピ ー ド の 調整 に 使い ます 。 一 回 の 噴射 で 燃料 を 10 ユ ニッ ト 消 費 し ます 。 

速度 は 画面 の 左下 に 表示 され ます 。X が 横 方 向 の スピ ー ド で , 右向き が 二 で す 。Y は 垂直 
方 向 の スピ ー ド で , 下向き が 十 で す 。 何 も し な いと , 1 単位 時 間 に Y 方 向 の スピ ー ド が 十 1 
され ます 。 ロ ケッ ト を 噴射 する と , 1 単位 時 間 あ た り 5 Y 方 向 の スピ ー ド が 一 2 る れ ま す 。 ス 
ター シッ プ が 斜め の 時 に ロケ ッ ト を 使う と , XX, YY 方向 共 に スピ ー ド が 1 ずつ 変化 し ます 。 

着陸 の た め の 条 件 は , X 方 向 の スピ ー ド の 絶対 値 が 2 以下 , Y 方 向 が 5 以下 で あり , か つ 
スタ ー シ ッ プ が まっ すぐ 上 を 向い て いる こと で , これ 以外 の 場合 は 爆発 し て し まい ます 。 

着陸 に 成功 する と, 着陸 点 の 倍数 に , 残り の 燃料 を か けた だ け の 得点 が 加算 る れ , スタ ー 
ト ボ タン を 押す と 次 の パタ ー ン に 進み ます 。 1 面 進 む ご と に , 燃料 か 650 ユ ニッ ト ず つ 減 6 
され ます 。 ま た だ た , スタ ー シ ッ プ が 最初 か 6 X, Y 方 向 に スピ ー ド を 持っ た 状態 か 6 ら 始まり, 
だ ん だ ん 困難 に な っ て いき ます 。 

の v 基 ”。 | 
文 プ ログ ラム の 説明 
人 初期 設定 (100-550) 

スプ ライ ト の 定義 。 パレ ッ ト の セッ ト , 変数 の 初期 化 , 画面 の 設定 を 行ない ます 。 
人 @ 姿 地 制 御 (1000~1050) 

キー 入力 を チェ ッ ク し て ,。 スター シッ プ の 姿勢 の 変更 を し ます 。 ス ター シッ プ の 血 き は 変 
数 HD に セッ ト さ る され て いま す 。 
スピ ー ド 変更 (1060 一 1140) 

ボタ ン A が 押さ きれ て いれ ば , スタ ー シ ッ プ の 向き に 応じ た スピ ー ド の 変更 を 行ない ます 。 
@ 座 標 チ ェ ッ ク (1150 一 1300) 

新しい 座標 を 計算 し て , その 座標 の BG 面 に 書か れ て いる 物 を 調べ で , コー ド を じ に セッ ト 
し ます 。 C の 各種 類 に 応じ た 処理 に 飛び ます 。 
着陸 処理 (2000-2040) 

着陸 の た め の 条 件 を チェ ッ ク し て , 満た し て いれ ば 着陸 成功 で す 。 残り 燃料 を 得点 に 加算 
16 ファ ミコ ン ソ フト 集 001 


1 の 3 の 
1 の 4 の 
1 の 45 
1 の 5 の 
1 の 6 の 
1 の 7 の 
1 9 の 8 
1 の 7 の 
1 1 の の 
111 の 
1 1 2 の 
1 1 さ の 
114 の 
1 15g 
11 6 の 
11 7 の 
1 1 の 
1190 
12 の の 
1210 の 
1 ご さ の 
124 の 
126 の 
+ メ / 
12 昌 の 
』 2 ソロ 
1 さ の の 
1 さ 1 の 
< の の 
2 の 1 の 


IFK=2THENHD=HD-1 』 IFHD く THENHD= の 
FL=FL- 

DEFBPR1ITE 。( さ 。 の 。 の 。ー(HD= さ ) 。 の ) mCHR(LB(HD) ) 
SGPRITEHD 。 X/Z 。Y/Z 

S=GTRIGB (の) 』 VYmVY+1 

IF8< >BTHEN1 155 の 

SPRITE 昌 。X/Z+FX(HD) ,。Y/Z+FY(HD) 』FL=FLー1 の 
NHD+1B0TO1 1 の 9。1119。112 の 9。11 さ の 。1140 
VX=VXー- さ 』 BDTD1 1 の 
VX=VXー1 』 VY=VYー1』BOTO 115 の 
VY=VYー ミ 』 BUDTD 115 の 
VX=VX+ 1 』 VYmVY-1』GUTD 115 の 

ソソ X= ソ X+ さ 

XmX+VX』 YmY+TVY』 IF Y/Z く 24THENYm24%Z 
BX=(X/Zー16) /BiBYs(Y/Zー24 ) / 日 
CmASC (BPR も (BX 。 BY ) ) 

IF NOT (CeS2 UR C=25 DR Cm26) THEN 
C=ABC (SBCR も (BX+1 。BY ) ) 
IF NOT(C= さ 2 UR Cs205 
CmABC (BCR$(BX BY+1 ) ) 
IF NT (Cm さ 2 UR Cm2 の 5 DR Cm26) THEN 
CNBC (BCR$(BX+1 。BY+1 ) ) 

IFNDT (C= さ 2DRC=295DRC=2 の 6 ) THEN25 ロ の の 
C=ASC (BCR ま (BX 。 BY+2) ) 

IF C>252THEN29OO 

C=ABC (BPR も (BX+1 。BY+2) ) 
IFC>252THEN2 の の の 

GPRI TE ロ 』 BDTH19 の の 
IFABS(VX ) >2 ロ RBB (VY) 5 ロ RHD< 22THEN25 の の 
SC=8Dー((C=2 ロ さ ) (CD=254) *%2 ォ (Cm の 5 ) * 呈 ) FL 


< りら の の 


OR Cm2 の 6) THEN 25 の 


< ら の の 


ァ ス テロ イト 1/ 


し ます 。 
⑱ ゲ ー ム オー バー (2500 一 2540) 

スプ ライ ト を 消し ます 。 

9 ーー ^ を に 

文 プ ログ ラム の 改造 

燃料 を 増やし た い 人 は 210 行 の ドニ 1000 を 変え て くだ きい 。 同じ く 210 行 の Z= 2 を 適当 に 
大 きく し て や る と スタ ー シ ッ プ は 反応 が 鈍く な り ま す 。 

地形 を 変え た い 人 は 。 自分 で BC 画面 を 作っ て くだ きい 。 た だ し この 時 , 着陸 地点 は 次 の キ 


ャ ラク ター を 使い っ 
バエ ーー IM 5,、 メ ウー プーM 0. メ 5 一 つ MT 


文 愛 数 表 


6 W スタ ー シ ッ プ 座 標 

VX, VY スタ ー シ ッ プ の スピ ー ド 
HD スタ ー シ ッ プ の 向き 
FL 燃料 

V スタ ー シ ッ プ の 初期 速度 
SC 得点 


AA 
2 ネタ 9 
ML 和 
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< LULUAIEO.ZJhFPRINMT テト 2 リ 07 tTT コ 59。「」 

S の IFSTRTIG( の ) く 21THEN2 さ の 
の LUCATE の 2 さ n PRINT" "GUTOU 5 の 
り ら 5FRIIEHDGFPR1ITE5 


に 
らぶ の LUCATE1 の BiPRINT "BAME VER" 
っ 4 の BUTOU 210 の 


0 


に て ます ど 
マッ リン と の ョ レデ 
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スタ ー シ ッ プ は , 無事 に 小惑星 “S3612-09" に 着陸 で きた 。 だ が , 着陸 地点 は , 調査 隊 の 


位置 か 6 少し 離れ て いる 。 さ る っ を そく 救援 に 向 か む うと し た 時 , 着陸 地点 の 上 空 に 黒い 点 が ポ 
ツボ ポッ ツ と 現われ た だ 。 ま る か …。 や っ ぱり ファ イダ ダー フラ イ だ 。 例 字 し つこ い ハ エ 達 な ん だ 

し か も 奴ら め , 我々 が 無事 着陸 し た の を 見 て , 捨て 身 で 攻撃 し て 来 た 。 何 と , 奴ら が 落ち 
た 所 は , 地面 に 大 穴 が あい て し まう で は な いか 。 あ ん な の に 体 当り され た ら 6, いく ら な ん で 
も たま ら な い 。 沙 ちる 前 に 撃た な く て は … 

し か し 攻撃 用 に エネ ルギー を 使う わけ に は いか な い の で , 古典 的 な タマ で 攻撃 し な く て は 
な ら な い 。 タマ に は 限り が ある が , さい わい 敵 か 味方 か よく わか ら な い が , カラ ス の よう な 
奴 が 補給 用 の タマ を 沙 と し て いく 。 あ れ を 拾い な が 6 戦う し か な る そう だ 。 や れ や れ ……。 


友 ゲ ー ム の 説明 
次 々 と 降っ て 《 る ファ イタ ー フ ライ を 撃ち 落と し て 《 だ さい 。 ス ター シッ プ は ユン トロ ー 
ラー て 動か し ます 。 
プ ブログ ラム を 走ら せる と 。 例 に よっ て , 
PUSH START BUTTON/ 
が 表示 され ます か ら , コン トロ ー ラ ー [の スタ ー ト ボタ ン を 押し て ゲー ム を 始め ます 。 
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ブ プログ ラム ハム 、 リ スト (Be 画面 デー ター は 97 ペ ー ジ ) 


1 の の CLB』CBEN2I CBSET1 3 GPRITEON 
11 の PALET 8 1。47,4B。21 。1 日 
129 PALET 8 2。4,4 昌 。S 日 。18 
13 の PALET 8 さ 。47。4B。4 日 。4 晶 
14 の 9 DEFBPRITE の 。 (の,。 1 の 。 の 。) = リヒ 9 つ 5 へ 5 ホ 9 
15 の 9 DEFBPRITE1 。(。 1 の, の) =CHR ま (1 の ) +CHR (1 日 1 ) +CHR 
ま (1 昌 2) +CHR ま (1 日 さ ) 
2 の LUCATE 呈 。B』FRINT "FUBH BTART BUTTDN! " 
21 IF BTRIB( の 9) く >1 BHTH21 の 
22 の BC= の 』 BH= さ 
さ の の M=1 の 』CX=14』 人 AX=ー1 = の 
さ の 2 VIEM』 GBDSUB6 の gi BUBUB6 1 の 9』 GBDSBUB629 の 』 BSBUB6 さ の の 
さ 1 の 9 BPRITE の 9,CXxB+16』16BISFRITE1 
さ 2 の 9 PDBITIDN5 。 の の 
9 の IFGTRIG (の) =BBUBUB 1 の の の 
1 の 5B=STICK() 』 XsCX-(Bm1)+ (Bm2) 』 IFBm ウ GBDTD55 の 
2 IFX<THENX= の 
さ の IFX>26THENX=26 


49 IFBCR$(Xー(Bm1) 。2 の ) く 50 "THENCXmX』BFRITE。 じ Xx 日 +1 
6。16 

55 の IFC>gAND(CX=AX DR CX+1mQX) BUBUB2 ロ OO 

5 1FCD>9THENCD=Cー1』 IFCmTHENLHCATEAX ,19kFRINT" "IN 
X メ =ー1 


らら ら 6 IFYFUS(5) =1766OSUB45 の 

りら 6 の IF CE RND_ MOVE (5) = の AND_ MOVE(4) 人 AND XFOS(4 7 人 
X# 昌 +16THENMOUVES 

ウノ の XE じ XXB+16sFURS=TOUSI エ = 

ご つら の [FRBS(XPOS( エ うーX) く 16RNDYFOUS (IT) 2152THENS=4: NEXTr 
GUTD3 の 0 の 


スタ ー シ ッ プ は , コン トロ ー ラ ー の 十字 ボタ ン で 左右 に 動か し ます 。 こ の 時 , 動け る の は 
地面 の 上 だ け で す 。 ま た だ た, ファ イタ ー フ ライ が 落ち て で きた 容 は 越え られ ませ ん 。 

タマ の 発射 は , ユ コントローラ ー の A ボタ ン で す 。 最初 は , タマ が 10 発 し か あり ませ ん 。 残 
り の タマ 数 は 画面 の 左下 に 表示 る きれ て いま すか ら , 慎重 に 狙っ て くだ さい 。 

10 発 撃っ た ら 終わり で は あん まり で すか ら , タマ の 補給 が あり ます 。 画面 の 上 の 方 を カラ 
ス (ニッ トピ ッ カ ー) が 飛ん で いく 途中 で , タマ を 投下 し て いき ます 。 こ の タマ は 地上 に つ 
いて , そこ に 地面 が あれ ば “@” が 表示 る され ます 。 こ れ を スタ ー シ ッ プ で 回 収 (を た こ へ 行く 
だ け で よい ) する と 上 。 タマ が 10 発 増え ん ます 。 た だ し スタ ー シ ジップ は 20 発 ま て し か タマ を 持て 
ませ ん か ら , オー バー し た 分 は 捨て られ て し まい ます 。@ は し ば ら 《 す る と 消え て し まい ま 
すか ら , 素早 く 拾っ て くだ さい 。 

ファ イタ ー フ ライ は 1 匹 10 点 で , 500 点 ご と に スタ ー シ ッ プ が 1 機 増 えま す 。 

文 ブ ログ ラム の 説明 
人 初期 設定 (100 一 320) 

スタ ー シ ッ プ と 爆発 用 の スプ ライ ト の 定義 , パパ レット の 色 セ モット , 変数 の 初期 モッ ト な と 
を 行ない , 画面 の 表示 を 行ない ます 。 

@⑱ ス ター シッ プ 移 動 (500~540) 

キー 入力 を チェ ッ ク し て , A ボタ ン が 押 き る れ て いれ ば タマ 発射 の 処理 (1000 行 一 ) へ , 十 
字 ボ タン な ら 左 右 の 移動 を 行ない ます 。 

@ フ ァ イ タ ー フ ライ 処理 (570 一 620) 

スタ ー シ ッ プ の 位置 (スプ ライ ト 座 標 ) を 変数 叉 に セッ ト し て , ファ イタ ー フ ライ と の 位 
置 を 比較 し て , 衝突 し て いる か を 調べ ます 。 衝突 し て いれ ば その 処理 (3000 行 ) に 飛び ます 。 
同様 に し て タマ が ファ イタ ー フ ライ に 当っ だ た か を 調べ て , 当っ て いれ ば 3500 行 か ら の 処理 を 
呼び ます 。 フ ァ イ タ ー フ ライ が 地面 に 着い て いた ら 穴 掘り 処理 (4000 行 ), 表示 る れ て いな け 
れ ば 発生 処理 (5000 行 ) を 呼び ます 。 以 上 を 4 回 (4 匹 ) くり 返し ます 。 

人 @ 補 給 発生 処理 (650 一 670) 

すでに 発生 し て いな けれ ば , 1/50 の 確率 で タマ の 補給 が 生じ ます 。 タ マ の 投下 位置 は 乱数 
で 決め , 変数 AX に セッ ト し て セ おき ます 。 

信 タ マ 発 射 処 理 (1000 一 1010) 

タマ を 発射 済み か , 残り の タマ が な い 場 合 は 何 も し な いで 戻り ます 。 を そう で な けれ ば , タタ 
マ を 撃ち ます 。 

人 補給 獲得 (2000 一 2010) 
残り の タマ 数 を 10 発 増やし ます 。20 発 を 越え だ 分 は 加算 る され ませ ん 。 


メ ノ ファ ミコ ン ツ ソフト 「 集 0661 


5B5 IF NDT MOVE(6) BOTD6@ の 

59 の IF XPOB(1)-6<XPUS(6) AND XPOB(T)+14*XFDB(6) AN 
D YFDS(T)+14>YFOUS(6) QND YPOB(1I)-6<YPOB(6) BUBUB さ 
の の “ 
6 の の IF YPOB(1)=16BBUSUE4 の の 
61 の IF NDT MOVE(1) GUBUES の の 

629 NEXT 

63 の IF NOT MOVE(6) THENERA6rFDBTTION6 ,2555 。 
649 IF XPDS(4)=16THENERA4:POSITIUN4 ,2 旨 。 の 
65 の IF AX> ウ OR RND(5 の ) > の GBDTO5 の 
669 DEFMOVE(4) =BPRITE(1 昌 」7。2。1 の 日 。 の ) 

662 AX=RND(2B) jPOBITIDN4 」232。24』MUVE4 

6655 DEFMDVE ( 呈 ) =SBPRITE(12。 昌 。1 6 日, さ ) 

67 の PUBITIDN5 。AXx 日 +16』4 の 9』 BOTD5 の gg 

19 の の IFHDVE(6) DRM= ウ THENRETURN 

1 の 995 DEFMUVE(6) =SPRITTE(12 1 。1 。64。9。) 
1 の 1 の PUBITIUN6。CX B+2。 16』 MDVE6』 =M-1』 BUSBUB6 の の の 』 R 
ETURN 

2 の の MsM+1 の 』TFM>2THENM=2 の 

2 の 5 LOCATEAX 。19sFRINT" " 

2 の 1 の BUBUB6 の 9! AXmー1: Cm の RETURN 

さ の の の ERAIISBFRITEI SFRITE1 。CX* 日 +16 16B』BHeBH-1 POB1I 
TIONI 。 の 9。 の 

さ の 1 FURJ= の TU999』NEXTIERA 1 。2」 さ 。4。 呈 。6 

スロ 2 の IFSH= ウ GOTD1 の 9 の の の 

ささ の BUTD さ の 

さ 5 の の ERAT。6kFOBITIDNT 。 の 。 の iFPOBTITTDN6 。 25B 25 BC=BD+ 
1 の 』 BUDBUE61 の の 

さ 51 の IF(BC MOD5 の の ) mgTHENBH=BH+1 5 GDBUB6 さ の の 

さ 呈 2 RETURN 
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ファ イタ ー フ ライ と スタ ー シ ッ プ の 衝突 (3000-3030) 

爆発 の 表示 を 行ない 。 ス ター シッ プ を 1 機 減ら し ます 。 残り 0 が 0 な ら 6 ゲー ム オ ー バ ー で す 。 
@ タ ママ 命中 (3500 一 3520) 

得点 に 10 点 加え を ます 。500 点 に つき スタ ー シ ッ プ 1 機 が ボー ナス と し て 増え ます 。 
人 @ 入 掘り 処理 (4000 一 4020) 

ファ イタ ー フ ライ が 落ち た 所 に , 穴あけ ます 。 そこ に 補給 の タマ が あっ た 場合 は それ 
クリ デミ きれ て し まい ます 
@ フ ァ イ タ ー フ ライ 発生 (5000->5010) 

確率 1/50 で ファ イタ ー フ ライ を 発生 きせ ます 。 出現 位置 は 乱数 で 決定 し ます 。 
@ デ ー タ 表示 用 ルー チン (6000 一 6300) 

残り タマ 数 , 得点 . ハイ スコ ア , 残り スター シッ プ 数 を 表示 し ます 。 
ゲー ム オ ー バ ー (10000---10020) 

ゲー ム オ ー バ ー の だめ の 処理 で す 。 


文 変 数 表 


CX スター シップ 位置 
AX 補給 投下 位置 

M 残り タマ 数 

w 補給 消 減 ま で の 時 間 
SH スタ ー シ ッ プ 残 り 機 数 
SC 得点 

HS ハイ スコ ア 


スプ ライ ト (DEEF MOVE) 
は で の アゲ ナ た まま ン の ダス 
また ーッ ド ピ ビ ピッタ ー 
5 補給 用 タマ 
レン 
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4 の 9 の J=(XPDB(1)-16) /BILUCATEJ 。 29s PRINT" "ERAI 
4919 IF C=g OR JX>AX BUTD4920 

49155 LODCATEJ 』19kPRINT" "EC= の IAXmー1 

4929 POBITIDNT , の 9, の iRETURN 

459 の 9 FUSITIDN5。 の , の 』ERN 

4595 IF SCR も (AX 2 の)= リ "THEN AX=ー1』RETURN 
451 の Cm99iLOCATEAX 。19』PRTINT"@"』RETURN 

5 の 9 の IFRND(5g) >2THENRETURN 

5 の 5 DEFMDVE( 1 ) =SPRTTE (2 。 昌 1 。6 の 9。 の 。1 ) 

5919 POSITIONI ,RND(211)+16。4B』 MOVET』 RETURN 
6 の 9 の LOCATE9。21gFRINT" ミ サイ ルリ" ョ MI 0 "ERETURN 
619 の 9 LUCATE16。21iFPRINT "BCODRE"』 SCIRETURN 
62 の の LUCATE1 さ 。22hFRTINT リ HIT-BCDRE"』HSIRETURN 
6 さ の の LUCATE の 9,22kPRINT "BHTP"』SHs" "IsRETURN 

1 9 の 299 LOUCATE 1 の ,55IPRINT"BAME OVER" 

1 の 991 の IF SBC<=HG GOTU 2 の 


19 の 9Z の HBSmSCI GUSUB62 の の 9』 GUHTOS の の 


FLYFALL 25 


次 々 と 降っ て て る ファ イタ ー フ ライ を , 何と か 撃退 し て ほっ と し た の も つか の 間 , 今度 は 
敵 の 地上 部 隊 に 包囲 る され て し まっ た 。 包 囲 を 打ち 破 ら な けれ ば 味方 は 全 減 だ 。 現 在 使用 可能 
な の は 1 人 乗り の 小型 戦車 「 ス ター キラ ー」 が 数 台 あ る だ け だ 。 これ で , 増援 が 到着 する ま 
で 敵 と 戦 か わな く て は な ら な い 。 前 進 基地 の 運命 は , 君 の 活躍 に か か っ て いる 

コン トロ ー ラ ー を 使っ て 「 ス ター キラ ー」 を 操作 し , 周囲 を と りか こむ 敵 の 砲 を 破壊 し て 
《〈 だ さい 。「 ス ター キラ ー」 の 方 が 射程 が 長い の と , 戦場 に ある 障害 物 れ うま く 〈 利 用 し な い 
と , す で や 65 れ て し . ま いま す 。 


支 遊 び 亡 


ゲー ム が 始ま る と , 画面 の 中 央 に 「 ス ター キラ ー」 が 表示 きる れ ます 。 周囲 の “回 "が 敵 の 
砲 , 赤い ボー ル み た いな の は 障害 物 で す 。 

「 ス ター キラ ー」 の 操作 は 。 コ ユ コントロー ラー 1 を 使い ます 。 移動 は 十字 ボタ ン で 行ない ま 
す 。 移動 方 向 は 上 下 左右 だ ど だけ で , な な め に は 動け ませ ん 。 ま た だ , 前 方 に 障害 物 や , 敵 の 砲 が 
ある 場合 も 動け ませ ん 。 

A, B の 各 ボ タン で タマ を 発射 し ます 。 タ マ は 進行 方 向 に 発射 され , A ボタ ン を 押す と ,「 ス 
ター キラ ー」 の 中 心 線 の 右側 か ら , B ボタ ン を 押す と 左側 か 6 発射 され ます 。 タ マ は , 一 度 
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プロ グラ /、 リ スト (Be 画面 デー ター は 98 ペ ー ジ ) 


1 の の CLS』CBSET1 1:BPRITEDN』DIM DX(7) 。DY(7) 
129 FOURI= の TO7』READDX(1) 。DY(I) 』aNEXTIDATA の 9。ー1。1』ー1 。 
2.0.2.1.1.2.9.2.-1, 1,-1.0 
149 DEFSPRITE9 。( さ 。 1 の 9, の , の ) =CHR ま (1B) +CHR も (181 ) +CHR 
も (182) +PHR$(1B2) 
25 ロ の N= の 』R=49:GH=4』B=1 の の 
さ の の VIEMiE=64 
4 の の FURI= の TD6』ERAT』FHBITIODNT の 。 の NEXTIBPRITE の 』 ビ X=9 
』 CY=9iD=1』 BUBUB さ の の 9: GBDSUB さ 1 の の 
42 の DEFMUVE(7) =SPRITE (日 。1 。4。4。 の 9』1) 』PHBITION7 ,BB , 1 の 
4 MOVEZ 
の の BmSTRIB( の ) 』 IFB> の BUSBUB 1 の の 
1 の B=SBTICK( の ) 』 IFS= の OURMUVE(7) BTOB6 の 
ロロ 2 ュー( ロ =1 ) X さ ー( ロ テク) * フ ブー(Bm4) * ロ (Bm 日) 』 Im (5-1 ) /1』F= の 
』IFB= の BODTU56 の 
呈 さ の IFSBDR も (CX+DX(1) 。CYTDY(1) ) = "ANDSCR 生 (EX+TDX (1 エキ 1 
ー) 。CY+DY(T エ +1 ) ) = リリ THENFmー1 
49 IFS<>D THENDEFMUVE(7) =BFRITE (日,。B。2,4 の 。1) Ds=BS 
呈 45 POSITIHN7 。CXk 昌 +16』CYX 昌 +24』 IFF THENCXmCXー( 昌 m さ ) + 
(=7) iCY=CYー( 昌 = 呈 )+( 選 =1 ) 
品 紀 9 MUVE7』 IFNUT F THENFURI= ウ TOBB NEXT』 CUT7 
品 69 IFNUT MOVE(6) BUTH64 の 
_ 兄 79 X=(XPOB(6) -16) /BIY=(YPOB(6) -24) / 日 
571 IFX<1ERA6Ii X= の 
572 IFX>1BERA6』 X=19 
7 さ IFY<1ERA6』 Ys の 
574 IFY>1BERA6』Y=19 


Lo ーー] 
ら B 」 ABC (BCR 事 (X。Y) ) コマ ンダ ー 2Z/ 


に 一 発 ず つ し か 撃て ませ ん 。 

敵 の タマ に は , 障害 物 れ すり 抜け て て る も の も ある の で , 障害 物 の 後 で も ノン ビリ し て い 
る と や られ て し まい ます 。 | 

また , 敵 の 砲 は 全部 で 64 個 で , 破壊 きれ る と , “"* ネ "に な り ま す 。64 個 の 砲 を すべ て 破壊 す 
る と 一 面 ク リア で , 次 の 面 に 移り ます 。 面 が 進む に つれ て 敵 の タマ の 数 が 増え , 射程 も 長く 
な っ て 難し て な っ て きま す 。 が ん ば っ て 〈《 だ きい 。 まあ, 最初 の うち は 一 面 ク リア する の も 
内 際 だ た 拓 い ます が の ms 

敵 の 砲 を 破壊 する と 20 点 , 障害 物 は 5 点 で す 。1000 点 ご と に 「 ス ター キラ ー」 が 1 台 増 え 
ます 。 
文 プ ログ ラム に つい て 

プロ グラ ム に つい て は , ファ ミリ ー ベ ベー シック Ver.2 の フリ ー エ リア を ほ ば 限界 ま て 使 
用 し て いま す 。 し た が っ て , プロ グラ ム を 入力 する 際 に は , 必ず リス ト の と お り に 入力 し て 
くだ さい 。 勝手 に プロ グラ ム 中 に スペ ー ス を いれ だ りす る だ け で メモ リサ 不足 (OM エラ ー) 
に な る 可能 性 が あり ます 。 た だ し , リス ト 中 に 入っ て いる スペ ー ス は その と お り に 入れ て く 《 
だ さい 。 取っ て し まう と 正しく 動い て くれ ませ ん 。 あと, IFーTHEN 文 の THEN が 抜け て 
いる 所 が あり ます が , これ は 間違い で は あり ませ ん 。 

プロ グラ ム は , 大 きく 分 け て 湊 の 様 に な り ま す 。 

100 一 イニ シャ ライ ズ 

400-- 画面 設定 。 座 標 セッ ト 

500-ー メイ ン ル ー チ ン 

1000-ー スタ ー シ ッ プ タマ 発射 

1500- 敵 タ マ 発射 

2000-ー スタ ー シ ッ プ 被 弾 

2500-- 一 面 ク リア 

3000-- 表示 用 サ プ ル ー チ ン 

この うち , メイ ン ル ー チ ン (500 一 ) と 敵 の タマ 発射 ルー チン (1500 一 ) を 簡単 に 説明 し て 
な きま す 。 ま ず , メイ ン ル ー チ ン は , キー 入力 と 「 ス ター キラ ー」 移動 (500550 行 ), タ 
の 位置 チェ ッ ク (560 一 630 行 ), 敵 の タマ チェ ッ ク (640-690 行 ) に 分 か れ て いま す 。 

タマ の チェ ッ ク ( タ マ が 障害 物 に 当たっ た か どう か ) は タマ の 位置 の BG GRAPHIC 座標 を 
計算 し て , SCR$ 関 数 を 使っ て 直接 BG 画面 に 何 が 描か われ て いる か を 調べ で ,「 ス ター キラ ー」 
に 当たっ た か どう か は , 両方 の スプ ライ ト 座 標 を を の まま 比較 し て いま す 。 

敵 の タマ 発射 ルー チン で 重要 な の は , 射撃 の 正確 さ の 決め 方 で . あま り 正 確 に 撃つ よう に 
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67 の 
に 9 ( 
680 の 


IF IT= さ 260TO064 の 
IF Im=207THENBC=SC+5』 LOCATEX 。YnjPRINT" "』 BHTO62 


りら IFI く >2BGOUTO640 の 


LUCATEX。YaFRINTUX UGC=GC ビ +2 の 』 ビー ビー1 ! IFE= の BUTU25 の 


ERA6』 BUSUB さ の の の 

FURI= の TUNI X=(XPUS(T) 16)/B』Y=(YFOUS(【) 24) / 昌 

IF メ = ミ ー2GUSUB15 の の 

IFNOT_ MOVE(I)THENERATIIPHSTTIONT の, の! GODTO69 の 
IFXPOS(7Z) 6e く XPOS(T) ANDXPOB(7)+14>XPOS(IT) AND Y 
7) -B く YFOS(1) 人 ANDYFOUS(7 フ )+165YPOS (1) GHTU2 の 2 の 
IFABC(SCR 和 も (XY) ) m2 の 7THENLOCATEX』。YnFRINT) リョ POS 


ITIUN1 。。 の ERAI 
69 の NEXT 
7 の GUTD5 の の 


1 の の の 
1 の 1 の 
YP0g 
1 の の 
1 の さ の 
1 の 4 の 
1 の 5 の 
1 の 6 の 
1 の ウ / の 
1 9B の 
1500 の 
1510 の 
1520 
15 さ の 
154 の 


IFMBVE (6) RETURN 
DEFMDVE (6) =SPRITE(12。D 。 1 。B の 。 の 。 さ ) 』 XmXPDG(7) 』 Y= 
(7 ) 

IFBsBTHENDN D/2+1B0UTD1 の 5 の 。 1 969 。 1 の 7 の 9 。 1 の 4 の 
ON D/2+1GOTD1949。 1950 。 1 の 6 の 。 1 の 7 の 
FUSITIDN6 。X 。Y』 BODTD1 の Bg 
PSITION6 』X+ 日 。Y』i GUTD1 の 8 の 
PUBITIUN6 。 X+ 日 。Y+ 日 』 BUTD1 の Bg 
PDBITION6 。 X 。Y+3 

MOVE6』 RETURN 

X=』 Ysg』 IFRND (2) = の BOTD15 さ の 
IFRND (2) mgTHENX=19 
Y=(CY+16+RND (日 ) ) MDD29』 BODTO155 の 
IFRND (2) mg の THENY=19 

X=(CX+16+RND (BB) ) MDD2 の 
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し て し まう と ゲー ム が 上 難しく , と いう より は つま ら な く な っ て し まい ます 。 そこで , この ゲ 
ー ム で は 「 ス ター キラ ー」 の 位置 を 中 心 に し て 土 座標 ぐら い の 範囲 で タマ の 発射 位置 を 決め 
で eo ま 9 

実際 に は 。 1520 行 と 1540 行 で 乱数 を 使っ て , 多少 ズレ る よう に し て あり ます 。 今 は , 

ー 十 16 十 RND (8) 一 

と な っ て いま す が , も っ と 正確 に (難し く ) し た い 人 は , この 8 を 減ら し て , 減ら し だ 数 の 
半分 を 16 に 加え を て くだ きい (だ と えば 一 十 17 十 RND (6) 一 に する )。 も っ と デタラメ に 
し た い 人 は , 逆 に すれ ば いい わけ で す 。 

他 に 可能 な 改造 は , 
人 @ 敵 の 射程 を 変え る 

250 行 の R=40 を 修整 (小さ きく する と 短 か が く な る ) 
@ 敵 の タマ の 最大 数 を 減ら す 

2500 行 の N= ニ (N 二 1) MOD 4 の "4" を 1 一 4 の 範囲 で 変え る 。 こ の 式 自体 を な が くし て し 
まう と , タマ は 常に 1 発 で 増え な い 。 
⑱ ス ター キラ ー の 数 を 変え る 

250 行 の SH= 4 を , 好き な 数 値 に 変え る 。 
な た ど が あり ます 。 これ 以 外 の 変更 は 大 変 で す が , 参考 と し て 変数 表 を 載せ て お きま す 。 あと, 
画面 の 障害 物 の 位置 は BG 面 の デー タ を 変え れ ば , 好き な よう に 変更 びき ます 。 だ だ し , ゲ 
ー ム 開始 時 に スタ ー ト キラ ー が 現われ る 位置 に は , 障害 物 を 置か かない で くだ さい 。 


文 変数 表 


D スタ ー キ ラー の 向き 

CX,。CY スタ ー キ ラー の 現在 位置 (BG 座標 ) 
に 敵 の 射程 

N 英 の タマ 数 

SC 得点 

X,。 Y 各種 座標 用 

E 敵 の 砲 の 数 


スプ ライ ト (DEF MOVE) 
0 一 5 敵 の タマ 
6 味方 の タマ 
2 和み っ 盾 ラー 
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155 の IFBCPR$(X。Y) ='"RETURN 
156 の 9 日 = ミー(Ym19) 一 (X=) * さ ー(Ym の ) * ロ ー(Xm19) %7 

157 の 9 DEFMOVE( 1 ) =sBPRITE(12』H。1』R。g。 さ ) 』POUBTTIONI 。Xx 昌 
+16』Y 日 +24』 MDVE T 』 RETURN 

2 の の の ERATISPRITE の 』XPDS(7) 。YPDB(7) 』PLAY"C2E1B の " 
291 の 9 SGH=BH-1』 IFBH< の END 

2 の 2 の 9 BOTD4 の の 

25 の の RmR+Bs IFR>64THENRm4』 Nm (N+1 ) MOD4 

251 の 9 PLAY"C1BDEF "BUTD さ の 

さ の の の LUCATE22。5』FRINTSC 

31 の IFBC>=B THENBHmBH+ 1 』 BmB+19 の の 9! BUDBUB さ 1 の の 

さ の 2 の RETURN 

さ 1 の の 9 LOCATE2 さ 。12nPRTINTSH』" "』RETURN 


オウ の の は の は の 3 の そそ う の の の ら いのら の の に 
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【 NNY 計時 時 WWW 時 日 時 Wi 8 衣 、 


陳 ヒコ に コ 
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この ゲー ム は , コン ビ ピュー ター・ ゲ ー ム の 大 古典 と も いえ ます 。 お そら 6 らく, ほど ん と の コ 
ンピュータ ー 用 に 発表 , 発売 きれ て いる で し ょ 2 う 。 

ルー ル は 人 筒 単 で す 。 丸い 球 を コン トロ ー ラ ー て 上 和 ト 左右 に 動か じ て 〈 だ さい 。!$」 が エサ て 
す 。「$」 を 食べ る と, いも 中 の 長き る が 一 つ ふ えま す 。 か べ で に ぶつ か っ だ た だ り , 目 分 の 体 に ぶつ 
か る と GAME OVER で す 。 ま だ た だ た レベル 8 一 9 で は , ある 長き 以上 に な る と,「 貞 」 が 出 て き 
ます 。 こ の 「 錯 」 に ぶつ か っ て も , GAME OVER で す 。「$」 1 個 食 べ る ご と に 得点 は 10 点 
プラス る さる 札 ます 。 


文 遊 び 万 


「RUN」 す る と , ゲー ムレ ベル を 聞い て いき ます 。 0 一 9 の 数 字 キ ー を 押し て 〈《 だ さい 。 
れ は , いも 目 の 移動 スピ ー ド を 変え ます 。 0 が 一 番 遅く , 9 が 一 番 速 く な が っ て いき ます 。 
の 時 , RETURN キー は 押す 必要 が あり ませ ん 。 

得点 は 画面 下 に 表示 きれ ます 。GAME OVER に な る と その 回 まで の ハイ スコ ア が 表示 る 
れ ま す 。 ハ イス コア は , スト ッ プ キー で ゲー ム を と め だ た だり , 電源 を 切ら な い 限 9 り 残り ます 。 

この ゲー ム に は いろ ん な バリ エー ショ ン が あり ます 。 た だ と えば , 砂漠 で エサ る が し 。 こ の 
場合 、 エ サ を 1 つ 食 べ る と エネ ルギー が 20 に ふえ ます 。 を そし て 1 移動 ご 上 と し に エネ ルギー が 1 


(Y 『Y 
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プロ グラ ムリ スト 


1 の 
ょ の 


/ ウ 
じ H 
の 
ヒ メ 
9 の 
」 し 
11 の 
1 2 の 
1 3 の 
1 4 の 
15 の 
< の の g 
<1 の 
<< 
< ご の 
9 の 
910 の 
ワン 
9 さ の 
1 の の 
1 の 1 


DIM (1 5 の ) 
FOR I= の TU 5iA(g。1) = の gkA(1。1) = の INEXT 
CLS:LOCATE の 。』1iPRINT "LEVEL LOM= ウ ーーー HIGH=9 


人 =TNKEY も 』TF 則り の リロ 0R 條 209 リ 0 THEN 45 
Mn=2 フ ウーUAL (人 も ) * さ 幼 
し し 5 
LHCATE の 。 の 9』PRINT CHR も (239)』:iFUR 1 エ =1 TO 26sPRINT 
R も (237) 』sNEXTIPRINT CHR 和 も (24 の )』 
FR Ial TH 21nLHCATE の IIFRINT CHR$(2YB) LOLRT 
ノ 。IIFRINT CHRe(238B)JiNEX「 
LOCATE の 。22:PRINT CHR ま も (241)nnFUR 1=1 TU 26』FRIN 
HR$ も (2 さ 7) 』kiNEXTIPRINT CHR も (242)』 

FUR Jp0 1U 7 

LODCATE RND(26)+1 。RND(21)+1LPRINT も 1 

NE 人 

QX=14E QRY=2I QRH=m4: 人 し =11 FIG じ = の 

(の 。 の )=14:R(1 の ) = 

GOSUR 9 の 

K=GTICK( の ) 5 ITF KK>2 の THEN 人 H=K 

FUR Is TO MAINEXT 

BUTOU 2 の 

IF AH=4 THEN RY= 代 Y+1 

IF AH=2 THEN AX= 仙 メー1 

IF AH= ヨ THEN RY=RY~1 

IF AH=1 THEN AX= 人 QRX+1 
のり AF=AF+1』TF FmS1 THEN Fm の 
の QnE=AF-AL ョ IF AEXKO THEN AE=RE+ 人 1 
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マイ ナス きれ , 0 に な る まで エサ を 食べ な いと エネ ルギー 切れ に な り ま す 。 こ れ も , も う ひ と 
ひね り し て , エサ を 一 つた で され ば 長き が 一 つ ふ え , エネ ルギー を 10 消 費 す る ご と に 長き を 一 
つべ へら す 。 と いう の も 考え 6 れ ま す 。 
だ と えば , 140 行 と 1350 行 を 変更 し , 1005 行 を 追加 し ます (リス ト -2 )。 こ れ で , いも 中 は 20 
回 移動 を くり 返す まで に エサ を と ら な けれ ば GAME OVER に な っ て し まい ます 。 

この プロ グラ ム の 特長 は , いも 中 の 長 る が 長く な っ て も 移動 の 速度 を 変え ん な くす る た だ た め , 
常に 頭 と し っ ぱ ぽ の 部 分 し か 見 て いな い , と いう 点 で す 。 い も 中 の 各部 分 の 座標 は 配列 変数 
A ( ) . の 中 に 入っ て ます が , 先頭 =AF, と , 長き ニ AL だ け で すべ て を 管理 し て いま す 。 を 
し て 配列 変数 A ( ) を 使い きる と まだ はじ めか ら 登 録 し て いま す 。 し だ た が っ て へ ビ ば の 長 る 
を 変え る 時 は , 10 行 , 1000 行 , 1010 行 。 1350 行 を 変え て くだ さい 。 短く する 時 は 1350 行 だ け 
で いい の で す が WDW と 


支 プ ログ ラム の 説明 


10 配列 宣言 
20 配列 変数 の 初期 化 
40->50 レベ ル 選 択 


60-90 わく 〈 を 書く 
110~130 最初 の エサ の 配置 
140-150 変数 の 初期 化 


200 いも 虫 移動 の サブ プ ル ー チ ンコ ー ル 
210 方 向 変換 の よみ と り 

220 レベ ル に 応じ た 時 間 待 ち 

230 200 行 へ も どる 


900-930 進行 方 和 に よる いも 虫 の 先頭 位置 決定 

1000-1010 ポイ ンタ ー 変 更 

1020 一 1030 進行 方 身 の キャ ラク ター を し ら べ る 

1100 一 1300 ポイ ンタ ー の し めす 所 に いも 虫 の 先頭 座標 を 登録 , いも 虫 を 表示 , 一 番 う し 
ろ の 位置 を 消し て , メイ ン へ 

1350 エサ を た べた 時 の 得点 を プラ ス し , エサ を 消し , 長 さ を ふやす 。 長 さ が 50 以 
上 な ら 障 害 物 を 置く サブ ルー チン を 呼ぶ 

1360 一 1390 減っ た 分 の エサ を 他 へ 置く 

1400 一 1420 障害 物 を お く , サブ ルー チン 

1500-1600 ハイ スコ ア を きめ て 表示 キー を 押す と 20 行 へ 
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1 の 2 の IF BCR 和 (AX』aY) = りり THEN BUDBUB 1 さ 359』BDTO 110 の 
19 さ の IF BCR も (AX』AY)X>" リ THEN 15O 

11 の の (の 。QF) mAXIA(1。AF) mAY 

129 の 9 LUCATE AX』QYIPRINT CHR$(2 の 7) 』 

1219 LUCATE 人 (AE) (1。AE) iPRINT "リョ 

1 さ の の RETURN 

135 の AL=AL+1』SCmBC+1aLUCATE 6。23JPRINT "BCORE ="』IB 

CI" の "iiLOCATE AX,AYIPRINT CHR$(297) 』i IF aL>5 TH 

EN AL=5g』IF MA<4 THEN BUBUB 14 の の 

136 の BXmRND(26)+1』BYsmRND (21)+1』 ITF BCR$(BX』BY) く > ! 
THEN 1 さ 6 の 

137g LOCATE BRX。BYIPRINT " 生 " 

139 の RETURN 

1 4 の IF RND( 呈 ) *2ー さ <MA/12 THEN RETURN 

141 の CX=RND(26)+1』CY=RND (22)+1』 IF BCR 還 (CX。CY) で >" リ 
THEN 141g 

142 の 9 LOCATE CX』CYIPRINT CHR ま (219) 』』RETURN 

15 の 29 LUCATE 7。BsPRINT " GAME DVER  『"』 

151g IF SC>HS THEN HSmBC 

152 の 9 LUCATE 日 。19』PRINT ! HI-BCORE mVIHSI"O  "』 
15 さ O LOCATE 7,12aPRINT "HIT START  "i 

154 の IF BTRIB() = THEN 1549 

169 の 9 BOTO 2 
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文 変数 表 。 


AX いも 虫 の 先頭 の X 座標 

AY いも 虫 の 先頭 の Y 座標 

UN 順番 に AX, AY を 入れ て いく 

A(1, n) 

AH いも 虫 の 進行 方 向 , STICK に 対応 

1 還 いも 虫 の 長 さ 

AF 現在 いも 虫 の 先頭 の X, Y 座標 が 配列 変数 A( ) の どこ に 入っ て いる か を 示 
す ポ イン ター 「 

AE いも 虫 の 一 番 う し ろ (消さ な けれ ば いけ な いり 場所) の 座標 A( ) の どこ に 入 
っ て いる か の ポイ ンタ ー 

SC 得点 

AX 「 

AY 

BX 

BY ダミ ー の X・Y 座標 

DX 

CY 

WA 待ち 時 間 (レベ ル ) 


プロ グラ ムリ スト 2 


36 ファ ミコ ン ソ フト 集 001 


いも 虫 ご ろ ご ろ 3Z 


ほら , ガン バレ 。 止ま っ て な いで 前 に 進ん で くれ ク こら , 4 番 の カメ さん 。 お まえ に 残 
5 の 金 全部 賭け た ん だ か ら , 当たれ ば 9 倍 の 大 究 だ 。 : あ っ , こら こら , 1 番 と 3 番 , 先 に 
くん し や 補い 。 

いや 1 番 を の まま 行っ て し まえ 。 オ レ は 1 番 に 賭け た ん だ 。 ガ ン バ レ アグ 

じじ あ 。 ころ ああ は と どう な か る ん に 

ん な の 知る か .〆 

以上 , ある 日 の カメ ミ ん レー ス , 白熱 する ギャ ラリ ー の 声 で し た 。 


文 ゲー ム の 説明 
全部 で 6 匹 の カメ さん の レー ス で す 。 1 一 4 人 で 遊べ ます 。 1 人 で 遊ん で も つま ら な い の 
て 。 て まる の た た 0 作り まあ しま 0 
ゲー ム 開 始 時 は 各自 500 円 (少な いと 思う 人 は ドル だ と 思い まし ょ う ) ずつ 持っ て いま す 。 
賭け 方 は 単勝 の み で , 1 着 の カメ さん を 予想 し て 《 く だ さい 。 賭け 金 の 上 限 は あり ませ ん ($ 
ちろ ん 所 持 金 の 範 較 で す ) か ら , 一 発 勝負 の 好き な 人 は , 大 容 に 全部 賭け て み ま し ょ 2 う 。 
全員 が 賭け 終わ っ た だら, こじ ご で は 。 あと は ひたすら 大 ぎ し な が ら 見 守っ て く 
だ さい 。 競馬 と 違っ て , 相手 は カメ る ん で すか ら な か な か 進み ませ ん 。 完全 に 止ま っ て し ま 
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(BG 画 面 デ ー タ ー は 99 ペ ー ジ ) 


プロ グラ ムリ スト 
CBSET1 。2nSPRITEON 
DI DD(B) 。HN③) ,U(1 
FOR Is の TH5 
DEFMVE(1) =SFRITE(1 さ 。7。 さ 。 4 の 4 て) 
NEXT 

DLGjINFUT ナー ニッ テー アア ヒ 2 
IF PL<1 R PL>4 BOT 150 の 
PL=PL-1 

189 FOR 1=g T ロ PL 
199 PRINT "NO." ョ TI 
(1 ) =LEFT 和 も (NN も (1 ) 。B) 
2 の の MN(1 ) =5 の 

21 NEXT 

9 の FR TU=1 TD 6 
紀 1 の 9 BUSUE1 の の 9 の 9: BHSUB2O ウ の: GDBSUE さ の の 


1 の 
11 の 
12 の 
1 さ の 
1 4 の 
15 の 
1 6 の 
1 7 


。 さ ) 。NAb ( さ ) 。BL (55) 


(1-4) "』PL 


リン / ナス 2 エリ で TailNFPUT NAS(1)1hO* 


ら ン の MEXT 

こっ り END 

1 の 222 FUK ICO2 1L 

1 の 1 の OUD(I) =RND(⑦)+1 

1220 MIEX「 

1023 り FUR )= り 9 10 FL 

194 の CLLBiFRINT' ダ イル TU IL YK IFRITNT IOU リコ リノ 
1 の 5 の FOR J= ウ 「H BIFRIIIJ 1」 XX 1UU(UUINEAT 
1 の 220 LHCLATIE の 9 の 1924FRININIA ま (1)」 9 し リー テス 
1 ワ /79 FRIHIT 7 07 1 し ョ レシ 人 IFTIILD/ 

19B り IMNFUI ト ノ カ メー 27727 14U(O」 |/ 

12929g IF U( の 2.1)〈 く 9 HUR UO0 29 DUIU 1020 
11 の 9 INIFUI イフ ラ 77227 1U(1 1/ 
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う カ メ さ る ん も いま す が 。 いつ か は 全部 ゴー ルイ ン し ます か ら 。 
全部 の カメ さん が ゴー ルイ ン し た ら , 払い 戻し で す 。 時々 同 着 の 1 位 が あり ます が , 倍 擬 
どぉ り の 払い 戻し が 当っ た 人 みん な に あり ます 。 親切 な レー ス で すね 。 


文 遊 び 方 


まず 最初 に 遊ぶ 人 数 を 入力 し ます 。 

次 に 各 プ レイ ヤー の 名 前 を 入力 し て くだ さい 。 

名 前 を 入れ 終わ っ た ら ,。 さっ を く 〈 第 1 レー ス が 始ま り ま す 。 1 人 ずつ 順番 に 好き な カメ を 
選ん で 番号 を 入力 し て , 賭け 金 を 入力 し て くだ きい 。 こ の 時 , 画面 の 上 に , 各 カ メ さ ん の 倍 
率 が 表示 きれ ます 。 選 ん だ カメ さん が 見 事 1 着 に な れ ば , この 倍率 X 賭 け 金 が 払い 戻る れ ま 
す 。 倍 率 は 最低 1, 最高 9 倍 ま で で す 。 賭け 金 の 制限 は あり ませ ん 。 

全員 が 賭け 終わ っ た ら , 一 斉 に スタ ー ト で す 。 

カメ ミ きん が ゴー ル す る と , 横 に 着 番 が 表示 きれ , 全部 ゴー ル す る と, 画面 の 下 の 方 に 

HIT ANY KEY 
: 表示 が で ます か ら , 好き な キー を 押し て く 《 く だ さい 。 
を の 後 , 当たっ た 人 に 対す る 配当 が 表示 ぉ れ , 再び 
HIT ANY KEY 
が 表示 きれ ます か ら , キー を 押し て くだ さい 。 次 の レー ス が 始ま り ま す 。 レー ス は 全部 で 6 
レース あり ます 。 
文 プ ログ ラム の 説明 
人 @ 初 期 設 定 (100 一 210) 

配列 宣言 . スプ ライ ト の 定義 プレ イヤ ー の 人 数 入力 , 各自 名 前 入力 を 行ない ます 。 
⑱ メ イン (500530) 

劉 レ ー ス の 処理 を 呼び 出し , 6 レー ス 行 な っ だ ら 終 わり で す 。 

@ レ ー ス 前 ,。 カメ 選び (1000 一 1140) 

各 カ メ の 倍率 を 決め (1000 一 1020 行 ), 各 プ レイ ヤー の 入力 を 行ない ます 。 

まず 倍率 を 表示 し て (1040 一 1050 行 ), その プレ イヤ ー の 所 持 金 を 表示 し , 選ん だ カメ さん 
の 番号 を 入力 , 続け て 賭 金 を 入力 し ます (1060 一 1130 行 )。 

@⑱ レ ー ス 処理 (2000 一 2180) 

画面 を クリ ア し た 後 , カメ の 番号 と 倍率 を 表示 し ます 。 ス ター ト 位 置 に カメ セッ ト し て , 
全部 の カメ を 動か し ます (2010 一 2050)。 

後 は , 各 カ メ を 乱数 で 進め て , ゴー ル に 達 す れ ば 順位 を GL(H) に モッ ト し ます 。 変数 CH 
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1110 
1 12 の 
1 1 さ の 
1 14g 
20 の の 
2 の 1 の 
2 の 20 
2 の さ の 
294 の 
2 の 5 の 
2 の 6 の 
2 の 7 の 
208 の 
2 の 9 の 
21 の 
211 の 
212 の 
21 さ の 
214 の 
2150 
216 の 
217 の 
218 の 
さ の の の 
ド 

さり 1 の 
さ の 2 の 
ささ の 


+ リ (1 、 


IF HI(1.1). り 2 DR U(1.I)>MN(1) BHTH 1109 
MN( 1 ) =MN( 1 ) -U( 1 。 1 ) 

NEXT 

RETURN 

VIEM: BH= の : = SGPRITEDN 

FUR H= の @ TO 5 

LUCATE の 9。HX ス +25FRINT "NO。 "』H 
LOCATE 24。HX さ +2aFPRINT"X"』OD(H) 
POSITIUN H,。224 。HX24+ さ 2 

GL(H) = の INEXTIMOVUE の 。 1 2 。 さ 4 。 呈 
R=GH+1 

FUR H= の TO 5 

IF GL(H) > の GOTO 212 

IF MOVE(H) BOTO 211 

IF RND(9⑦) = の THEN MOVEH 

IF XPOS(H) バ 4 の BODSUE 2150 


NEXT 

IF BHeA2 IHEN RETIURN 

BOTO 2260 

IF Rm1 THEN 生 = 由 + キ HEX 刈 (日 ) 


BL (H) =Ri BH=GH+ 1 

LOUCATE 4。Hx さ +2sPRINTR 

RETURN 

LUCATE。22IPRINT "HIT ANY KEY"IIFAUBE』SFRITEDF 


LLSGaFUR ImD IiU FL 

FUR J=1 1U 6 

IF MID も (MM ま 。J。1)=HEX ま ( 有 U( の 。T)) THEN NMN(T)=MN(1) 
j)wOD(U(B、ITD)jFRINTNA4(T)」 9 ン 0 ノリ ロイ トウ 10(1 .【) 


XUD(U(9。1 ) ) 
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は ゴー ル し た カメ の 数 で , GH= ニ 6 に な れ ば 処理 を 終わ り ま す 。 

@ レー ス 後 処理 (3000 一 3060) 
画面 を シク リア し て か ら , 1 番 の カメ と , 各 プ レイ ヤー の 予想 を 比較 し , 当たっ て いれ ば 所 
金 に 倍率 X 賭 け 金 を 加え ます 。 


文 変 数 表 


OD (H) カメ の 倍率 

MN (P) プレ イヤ ー 所 持 金 

U( 8, P) プレ イヤ ー 予 想 (カメ の 番号 ) 
U( 1, P) プレイヤー 賭け 人 金 

NA$(P) プレ イヤ ー 名 前 

GL(H) カメ 順位 

W$ 1 位 の カメ 番号 

PL プレ イヤ ー 人 数 

P プレ イヤ ー 識 別 用 変数 


333333333 RNNRRAHHRRNIRIINRINRRRIRSNRIRRIRNRRRRRDSRIHHRSHN 3333 7 RRBN 


HONNDRSNRNN0DSONHDNNRHNONNONNNNSONNNNOOODNNNNOODDONNSENODD 


RNNRNNRRRRRRNRNNN 1 RNNRIS3HSRRNNRNSHSSRNANRIHRRNNNRHNNRGINNNRNNN3HHNRNNNSSNRNRRNSRRRNRNNSRR3D 


NISSNNNNNN 


NNNRRISRSRSS3 け に SN 1 1 NIRGSN 


SNS 朋 的 RNNNNHSSHSRRANN NN 1 届 は 32 
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33033333333333 は 1 


3 人 000000300200000HHNHHHO02ROHHHO00DOOHHO00000000H0000000082HHO00002 0 


ト し 


3133422222041 半 2520033002240100230020030003000 1 33933 お 3333 れ 1333331033133 け 43 


08383GBDDUGHGD333 


8 的 08 衣装 
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ッ ク BOMB 


ペン ペン が まち が っ て ,。 ニタ ニタ の すみ か に 迷い こん で し まい まし た だ 。 3 匹 の ニタ ニタ が 
ペン ペン を つか まえ よう と し て 近づい て きま す 。 し か た が な い の で , バク ダン で ニタ ニタ を 
や っ つけ て し まい まし ょ う 。 で も ,。 ペン ペン が 持っ て いる の は 時 限 バ クダ ン な ん で す 。 だ か 
ら ニ タニ タ が 通り そう な 所 に うま く 〈 く 置い て 歩か が な くち ゃ 。 置 いたら すでに そこ か ら 離 れ な い 
と 自分 ちい っ し ょ に や られ ちゃ うか ら 6 気 を つけ て 。 

ゲ ー ム の 説明 

ペン ペン を 動か し て , 時 限 バ クダ ン を うま く 〈 く セット し て ニタ ニタ を や っ つけ て くだ る い 。 
バク ダン は 同時 に 3 カ所 に セ モット で きま す 。 バ クダ ン を セッ ト し た 所 は 通路 の 色 が 黄色く な 
り ま す 。 セ ッ ト し て し ば らく する と 爆発 する の で , や られ な いよ うに うま (逃げ て くだ さい 。 

バク ダン が 爆発 し た と き , その 場所 か ら 6, 上 下 左右 に いた だ 物 は 全部 や られ て し まい ます 。 

得点 は , ニタ ニタ 1 匹 が 10 点 で 。 ニタ ニタ を 3 匹 や っ つけ る と 1 面 ク リア で その 時 の ボー 
ナス が 加算 され ます 。 得点 2500 点 ご と に ペン ペン が 1 人 増え ます 。 全 部 の ペン ペン が 爆発 で 
や られ る か , ニタ ニタ に つか まる と ゲー ム オ ー バ パー で す 。 

面 が 進む と , だ どん だ ん ニタ ニタ が 遠く か が ら で も ペン ペン を 見 つけ て 近づい て くる よう に な 
り , 正確 に ペン ペン を 追っ か け て くる よう に な り ま す 。 ま だ , 3 面 ご と に ニタ ニタ が 動く ス 
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ブロ グラ / ム 、 リ スト (Be 画面 デー ター は 100 ペ ー ジ ) 


19 の 9 CBBSET1 。2』BPRITEHN』DIMB(2,。2) 』FDRIm1TO4IDEFMDVE ( 
1 ) =SBPRITE(4 IX2ー1」 さ 日 。9。9) :NEXT 

11 の PALET B 1.47. エ B。SB、3BiPALET B 2.47.22.22.22 
さ の の LUDCATE5,BPRINT"HIT ANY EEY ! "iPAUSE 

31 の IFSC>HS THENHB=SC 

さ 2 の BC= の 』 BN=2B の の GBP= さ 』R= 1 の の 』FE= 

4 の の IFMDVE(D) GBDT04 

41 の VIEMi BOBUE さ の の の BDSBUB さ 1 の 9 BDSUB さ 2 の: GBDSUB さ さ の の 』E 
RAD , 呈 。6。7』E= さ 』 TM=B の の iDm2ICX=43 CDY=1 

429 PUBITIUND 。 さ 2。 さ 2kFORImBTD7』PDBITIDNTI 16 の 9,12BrB( 
9 。 1- 王 ) = の 』 NEXTi MOVED 

の の IFSTRIB( の ) =BBHBUB1 の の の 

1 の B=STICDK( の ) 』 ヨ =ー(B=1 ) *X2ー(B=2) *4ー(Bm4) * さ ー(BsB) k1 
29 IFS= ウ ORMDVE (D) BDTH57 の 

らら さ の X=DX-(B=O) *2+ (Bm4) *2Y=CYー(Bm さ ) *2+ (Bm1 ) の 

4 の IFABC (BCR(X+1 。Y+1 ) ) くう >255BDTD57 ロ 

55 の IFD<58 THENERAD』POBITIONS , XPOB (D) ,YP0S(D) 』 Ds 
56 の CX=X』CY=Y』MOVED 

7 の FUR1Is の TO2 

5B の IFB(。1) > の THENB(@。1) =B( の 。1) 一 1 ょ IFB( の 1) mgBDSUB1 


こら 7 の IEX「 

6 の FOURImSTH/ 

61 の IFXPUS(T) =259BUTU/10 

62 ワ の XaXPH ヨ (1)-XFHB(D)jYmYFHB(T)-YFUS(D) 

6 さ の IF(AEBS(X) く 14ANDY= の ウ ) ロ R(ABS(Y) く 14ANDX= の ) GUTU2O の の 
64 の IFMUVE(IT)GUTOUZ10 の 
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ビー ド が 少し ずつ 早く な り , 9 面 で 最も 難し く な っ て , 10 面 で また 1 面 に 戻り ます 。 


文 遊び 方 


ブロ グラ ム や RUM し ます と 
HITI ANY KEY / 
と 表示 ある れ ま すか ら , キー ボー ド の 好き な キー を (STOP キー は ほ は だ めで す よ / み ) 押す と ゲー 
ム が 始ま り ま す 。 

ペン ペン を 動か す に は コン トロ ー ラ ー 1 を 使い ます 。 十字 ボタ ン で ペン ペン は 上 下 左 右 に 
動き , A ボタ ン で 時 限 バ クダ ン を ペン ペン の 位置 に モ セット し ます 。 こ の 時 , A ボタ ン を 押し 
っ ぱな し に し て いる と 同じ 場所 に 2 つの バク ダン が セッ ト さ きる され て し まう 事 が ある の で 注意 し 
0 22 | 
文 プ ログ ラム の 説明 
念 初期 設定 (100 一 420) 

100, 110 行 が 配列 宣言 と スプ ライ ト , パパ レッ ト の 定義 部 分 で す 。 

300 行 以降 が 変数 の 初期 化 や スプ ライ ト 座 標 セ モット な どの 部 分 で す 。 ペ ン ペ ン の 数 を 増やし 
だ た い 人 は 32207 の PE キッ イネ また し て だ まり 。 

価 ペン ペン 移動 (500 一 560) 

まず コン トロ ー ラ ー の 入力 を 調べ , A ボタ ン が 押 き れ て いれ ば 1000 行 か ら の バク ダン セッ 
ト 処 理 を 呼び ます 。 

次 に 方 向 の 入力 を 調べ , 方 向 (1 一 4) を 変数 D に セッ ト し ます 。 入力 が あれ ば を その 方 向 
に 移動 を 行ない ます 。 入力 が な い 時 は , ペン ペン が 移動 中 の 時 は ここ の 処理 は スキ ッ プ しま 
す 。 

@ 時 限 バ クダ ン の カウ ント (570-590) 

3 つの バク ダン を 調べ で 。 モッ ト き され て いれ ば タイ マー を 1 減 6 し ます 。 0 に な っ だ ら 1500 
行か ら の 爆発 処理 を 呼び ます 。 
⑱ ニ タニ タ 移 動 

ペン ペン と の 距離 を 調べ で 、 それ に よっ て 移動 方 向 を 決め , 移動 し ます 。 

ペン ペン を つか まえ だ か どう か は 630 行 で 両方 の 座標 を 調べ , 重なっ て いた だ ら 2000 行 に 飛び 
ます 。 

710 行 で は , ボー ナス を 1 点 減ら 6 し ます 。 

@ 時 限 バ クダ ン セ ッ ト (10001020) [ 

ンー ジン も セッ ト る され て いた だ ら ( 全 部 の タイ マー が 0 で な けれ ば ), 何 も し な いで 
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65 の L=ABS(X)+ABB(Y) 』 IFRND(R) <L THENH=RND (4) x2+1 GBD 
TO69g 

67 の IFABB(X) ABB(Y) THENH= さ ー(X >g) *4』 BUTD69g 

68 =1-(Y< の ) *4 

69 の X1=XFDS(T) 』X=(X1-16) / 昌 - (Hm さ ) *2+(H=7) 』 YimYPOB( 1 
) 』Y=(Y1-24) / 昌 (Hs5) *2+ (Hs1 ) 

7 の IFASC(BCR も (X 。Y) ) m25B5THENDEFMDVE( 1 ) msBPRITE(1 1 。H 
。BP 16。9,2) iPODSITIONI 。X1』Y1』MOVE 1 

71 の NEXT』 IFTM*THENTM=TM-1』 BDSUBS さ の 

7 さ 3 の BOT05 の の 

19 の の IFB( の ,N) > の THENRETURN 

1 の 1 の B(1。N) =CXIB(2。N) msCYIEB( の ,N) m15 

1929 COLURCX 』CEY 』1:Nm(N+1) MDDSIRETURN 

15 の 9 の X=B(1。I)』YmB(2。T)』FURJm2TDOSTEPー2 

151 の COLDRX 。Y。J』IEDLHRX+2。Y。ICODLDRX-2。Y JICODLDRX 。Y 
ー1 JICDLORX 。Y+2 。JaNEXTI XmX 日 16』YmY 日 +24 

152 り FDRJ=5TD7』 X1=XPDB(J)』Y1mYPDS (J) 

15 さ の IF NOT((ABB(X1-X)<24 AND Y1smY)DR(ABS(Y1-Y) で 24 
AND XtsX) ) BHTD156@ 

1549 ERAJIPOSITTONJ 。 25 呈 。 2 E ビ = ビー1 1 1FE=ORETURNSSO 
155 の BC=GSC+1 の 』 GODSUB さ の の 9』 IFBD>mBN THENPE=PE+1 1 GOSUE 
さ 2 の の 』 BN=BN+25 の の 

156 の 9 NEXT X=B(1 。1)』YmB(2。1) 

157 の IF(ABS(CX-X) SANDCY=Y) DR(AES(CY-Y) SRNDCX=X) 
ETURN2 ウ の 

159g RETURN 

2 の 9 PLAY"C1ECB'』PEmPEー-1』 ITFFE く の BHTD さ の の 

2 の 1 の BOTO4 の 

25 の の BC=BP+TM』 BUBUE さ の の の 』 RsR+2BI 1TFR く 1755BUTH4 の の 

252 の R=1 の の 9: GPSP-1』 IFSPmTHENSBPm さ 
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戻り ます 。 そ う で な けれ ば , バク ダン の 双 座 標 を 配列 B(1, N) に , Y 座標 を B(2, N) 
に モッ ト し ,。 爆発 ま び の タイ マー と し て B(0, N) に 時 間 ( 今 は 15) を モッ ト し ます 。 

時 間 を 短 か く したい 人 は , この 数 字 を 小さ きく し て くだ さい 。 
@ バ クダ ン 爆 発 処 理 (1560-1590) 

まず を の 座標 の まわ り に ニタ ニタ が ある か を 調べ で, いた ら 消 し て 得点 を 10 点 加算 し ます 。 
ニタ ニタ の 数 が 変数 に モッ ト る れ て いる の で ,。 これ を 1 減 6 し ます 。E が 0 に な っ た だ たら 61 
面 ク リア で すか ら 2500 行 に 飛び ます 。 決 に ペン ペン の 座標 を 調べ , 爆発 の 男 囲 に 入っ て いた 
ら 2000 行 に 飛び ます 。 


文 変 数 表 


スプ ライ ト 
ペン ペン の 座標 1 4 ペン ペン 
D ペン ペン の 向き 2 ンス エダ ニタ 


N バク ダン の 番号 

B(0, N) バク ダン の タイ マー 
B(1, N) バク ダン の >xX 座標 
B( 2, N) バク ダン の Y 座標 


E ニタ ニタ の 数 

PE ペン ペン の 数 

TM ボー ナス 

SP ニタ ニタ の スピ ー ド 
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25 さ の BOTO49 の っ 
さ の 99 LOCATEB』2 の PRINTBCIRETURN 
199 LDCATE14』9iPRINTHSrRETURN 。 
の 9 LUCATE20,2 の PRINTPEI" "IRETURN 。 
gg LOCATE19,19sPRINTTMi" "iRETURN 


を 4 ト ) 
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リオ で ジャ ソン ケ ソ 


こま を と ュ ョ ルー トー 


YOU MEN マデ ご 
CONM  - YOU 


1 の 
きま ふ 


ジャ ン ケ ン は 日 本 の ふる ーー いあ を そ び で す 。 で も , 日 本 ど だ け の あ を び で は あり ませ ん 。「 ク 
「 チ ョ キ 」「2 パ ー」 こ を 使い ま は せん が , 同じ よう な あそび は , 世界 中 に ある そう で す 。 
we 大) 紙 に は 包ま れる が ハサミ に は 切ら れ な い 


チョ キ ( ハ サミ ) 紙 は 切れ る が 石 は 切れ な い 
>*ー  ( 紙 ) ハサミ に は 切ら れる が 石 を 包む 
ジャ ン ケ ン の 意味 は 上 の 通り で す が , 他 の も の を 使っ た も の (猟師 と 鉄砲 と 態 , 


ん る と に な が なめ を 4 を た) だ で きん ある よう で す 。 


ゲ ー ム の 説明 
この ファ ミコ ン 版 ど ジャンケン は 次 の 三 つ っ を 使い ます 。 
マリ オ 一 アキ レス に は 強い が レデ ィ に 弱い 
レン デイ ニーー マ リサ オ に は 女 の 強 味 。 で も アキ レス に は 負け る 

アキ レス ーー 一 カカ で は マリ オ に 負け る けど レデ ィ イ に は 勝つ 
だ 入 も だ だ の ジャ ン ケ シン で は つま ら な い 、 そく で , 次 の ょ よう な ルー ル を 決め まし た 。 
コン ピュ ー タ ー も プレ イヤ ー も , マリ オ ・ レ ディ ・ ア キレ ス の カー ド を それ ぞ れ 2 枚 持つ 。 


この 6 枚 は 表 に し て 相手 に 見 せま す (オモ テカ ー ド )。 そ の あし と 5 枚 の カー ド が 配ら れ ま す 。 
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0 


プロ グラ ムリ スト 


1 の 9 CLS』GPRITE ON』DINM 谷 (1 。 昌 ) 
2 の FOR Im TO 2:READ 人 Ad 
さく の DEF BPRITE 1 。』(1。 1 の, の の) mCHR 是 ( 介 ) キビ HR 征 ( 谷 寺 1) CHR 全 
(2) +T じ CHR ま ( 谷 寺 さ ) 
さく 5 DEF MOVE(1) =SPRITE (J。 7 1 2 の 0 の,1) 
4 の 9 DEF SPRITE さ +1 。(1 1 。 の 1 。 の ) =CHR 鉛 (人 RT1) + じ CHR 征 ( 生 ) + じ H 
R も (QA+ さ ) +CHR も (人 2 ) 
45 DEF MOVE(1+ さ ) =SPRITE (JJ 。 さ 。 1 2 の 。 の 1) 
呈 り 9 KEY 1+1 。CHR$(49+T) +CHR$(1 さ ) NEXT 
69 DATA の 。9,2B。1 64。 さ 
1 の の FOR Is= の TO 2 
11 の SFPRITE 1,』154』24+IX2BISPRITE エエ ワキ エ だ 
12 の 9 人 Q(。!)=2: 人 (1 。T) =2 
1 さ の NEXT』 CV=2』 YU の CY= の 
149 FOUR I= の TOU 4』J=RND( さ )+ さ IA( の JJ) FR( JJ)+1iJ=RND【 
さ ) + さ 』 人 A(1 。J) mA(1 。J)+1INEXT 
2 の の BUSUB 9 の 
21 ロ LODATE 日 1Z2IPRINT すこ 9 ググ ス て 1 
22 の IF AA(1。 の 9)+A(1 。 さ ) > の THEN LOCATE 9,141PRINT 「F1 呈 
7 り 4  「』 
2 さ の IF A(1。1)+(1。4) > の THEN LHCATE 9。14』PRINT 「F2 ョ 
レ し テ "イイ !」 
24 の IF A(1.2)+ 人 (1 5) > の THEN LOCATE 18』14』FRINT 「FS 
= アキ レス " 
259 LUCATE の 。15sPRINT " "maLDCATE の 。155』 INPUT 
Ki IF K<1 ロ R KR> さ THEN 250 
26 の IF (1。KK-1)+A(1 KR+2) く 1 THEN 25g 
27 の IF 人 (1 。K-1) = の THEN 3 さ 5 の 
マリ オ て ジャ ン ケ ン 91 


これ は 何 が くる か まっ だ くわ か り ま せん 。 を し て この 5 枚 の カー ド は 相手 に みせ ませ ん ( ウ 
ラ ・ カ ー ド )。 こ の 合計 11 枚 の カー ド を 1 枚 ずつ 出し 合っ て 勝負 を 決め ます 。 


文 遊 び 万 

プロ グラ ム を 打ち こん だ あと 「RUN」 す る と , 図 -1 の よう に な り ま す 。① の 数 字 が オモ テ 
カー ド の 枚数 , は ウラ カー ド の 枚数 で す 。 

「F 1 」「F 2 」「F 3」 を 使っ て 出す カー ド の 種類 を 決め ます 。 そ の カー ド が な い 時 は 受け 
つけ ませ ん 。 を その カー ド が , オモ テ と ウラ し と 両方 持っ て いる 時 に は , どちら か ら 出 すか を 聞 
いて きま す の で , 「F 1」「F 2」 を 使っ て 決め て くだ さい 。 

カー ド が 決定 する と , 両方 か ら 選 ん だ カー ド が 走り 出し て きま す 。 

ュ ン ピュ ー タ ー 側 の オモ テカ ー ド を 見 な が ら 6 作戦 と を た て て くだ さい 。 だ た と えば , の こり 4 
枚 で オモ テカ ー ド が 4 枚 し か な けれ ば 当然 ウラ カー ド に の こり は あり ませ ん 。 や り 方 し だ い 
で は 全勝 も 可能 で す 。 

文 プ ログ ラム の 説明 
30 一 60 マリ オ ・ レ ディ イ ・ ア キレ ス の スプ ライ ト と ムー ブ を 指定 し て いま す 。 
DEEFSPRITE | 0 ー ク 左 な き 
DEF MOVE 3 一 5 右 む き 
100 一 140 スプ ライ ト を 表示 
各 カ ー ド 初期 設定 

200 一 骨 : 六 ルー ニー チン 

200 一 280 カー ド の 種類 を 決定 

300 一 400 ウラ か オモ テ か を 決定 

それぞれ の カー ド を 減ら す 

450 一 500 コ ユ コンピュー ター の カー ド 決 定 

550-700 選ん だ キャ ラク ター 移動 

勝敗 を 決定 
回 数 が 11 回 以下 な 6200 行 へ 

800 一 899 総合 判定 

900-910 残り 枚数 の 表示 と 現在 まで の 勝負 の 表示 の サブ ルー チン 

と ころ が この ブロ グラ ム , 現在 で は コン ピュ ー タ ー 側 の カー ド 選 択 は 乱数 で 行なわ れ て い 
ます 。2K の メモ リー で は ぎり ぎり の 限 C す 。 

Ver. 3 を 持っ て いる 方 , ある い は , マリ オ や レデ ィ の キャ ラク ター を 使わ な く て も (見 た 
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2B の IF (1 。 に に +2) mm THEN 4 の の 
3 LUULATE 14』FRINT 「 ト チラ う カラ 2 で Fln オ モテ F 2m ウ ラ 

4 
3419 LUCUAIE 1SIFPRINT " aaLHCATE 90.15MINPUT 
HiIF HK1 UK H22 THEN 310 
さ 2 の IF H=1 THEN 4 の 
35 の 人 (1 。 ド +2) = 人 (1 。 ド + ジ ) -1 1 GOTO 45@ 
4 の AA(1 。KKー1 ) = 人 (1 ドー1 ) 1 
459 CRKsRND(6)』TF (2JCR) く 1 THEN 45 の 
らら 0 の (の 。CK) =A( ワ CK)-11TF CK522 THEN CKmC ド - マ 
9 の mw ド Kー1 MOVE (KR) 』:MUVUE ( じ KR+ さ ) 
6 の 9 PAUBE 1 の 9iLHCATE 1 の の.17』IF RsCK THEN PRINT "ヒキ 
ワ ケ か "CCY=CY+1 GOTO 7 の 
61 の IF (KRK= の AND CRs1) ロ R (Ks=1 AND CKe2) 0R (Km=2 AN 
D CKag) THEN FRINT "COUMPEUTER ! iLVaUVT1IOOIU /090 

ら 62 の IF (K= の AND CK=2) ロ R (Rs1 AND CK=2) OR ( ド =2 AN 
D LKa1) 「HEN FRINTF "YUHU MIMN ! ' 」YVwYVT1 

Z702 PFAUBE 15OIERA KCPK+3AILUCATE 日 17jFRJNT 『" 

analF CVTYVTCY く 11 THEN 200 

OU BPRIIE UFFJLULATE 0.23 上 FRINIIFRINIIFRINTIFRINMT 
sPRINTiFPRINTIiPRINT 
1 り 9 IF LV2VV_ THEM PRINT "CUMPUTER MIN LIGHTU 8B79 
2 クウ IF YVDLV THEN FRIMNT YUU MIN "IIBUTU B?97 
BGM PRINTI 「 ヒキ リク グ ! 
B99 PRINTAFPRINTLEND 

9 り MO FDR Ja の TH ZILUUATE 9.1+rJN3IFRINT | 7 】 IA(Bg 
JOiiLHULATE 2 1TTMSMFRINUT A(1.1)』」 [1A(1 13) 1 
JiiPUBSITIOUMN 7 124.21 の IPHBITIHN 1+ う 3.62 21 の NEXT 
212 LHCATE 9.19.FRINT "LOH ~- YUU IiLOUCATE 97. 211FKRX 
NT DU na YU』 iRETURN 
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目 が 悪く て も ), コン ピュ ー タ ー を も う 少 し お ぢ 利口 8 きん に し た だ たい 場合 は , 450 行 を 変え て くだ 
さい (リス ト -2) 。 

ま た , 最初 に 配ら れる ウラ カー ド を 自分 で 選べ さる よう に する の も お も し ろ い で し ょ う ( リ ス 
ト -3) 。 


文 変数 和 表 


A(』,。) コン ピュ ー タ ー 表 マリ オ 
A(, 1) コン ピュ ー タ ー 表 レデ ィ 
A(,。 2) コン ピュ ー タ ー 表 アキ レス 
A(8, 3) コン ピュ ー タ ー 裏 マリ オ 
A(#, 4) コン ピュ ー タ ー 裏 レデ ィ 
A(#。 5) コン ピュ ー タ ー 裏 アキ レス 
L___ っ ゝ 1 だ と コン ピュ ー タ ー 


K あな た の 出す カー ド 

CK コン ピュ ー タ ー の 出す カー ド 
CV コン ピュ ー タ ー の 勝ち 

YV あな た の 勝ち 

CY 引き 分 け 


プー ラプ タダ タス マッ 


ら ぁ “マソ オ サー エゴ アテ ー ア ディ に の = ウラ と ろう と 全 CE チ モト セ オー コン と 2 


2 Se 人 ッ 1 のみ サミー ゴー 人 
ご の NM - YOU ご CON 一 YO 
+ の 」 


を - 紅 
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プロ グラ ムリ スト 2 


469 DK=CKI IF DR>2 THEN DR=DK- さ 

47 の 9 IF RND(③) = HR CV+TYUV+TCY59 THEN 0 

489 DUmDRK+1nIF DU=3 THEN DUs の 

49 の IF A(1.DU)+A(1 DU+ さ ) ma(11-ーCYTCV+TYU) / さ THEN 450 


ブロ グラ ムリ スト 3 


14 の FUR Is TD 4』JmRND( さ ) + さ Aa( の 。J) mA( の 。 け )+1 
15 の 9 LUCATE さ 。12sPRINT 1 エ +18 リ マイ メ 。 トト" レラ エラ フト や リロ 
16g LUCATE 。14』PRINT "F1m マ リオ  。 F2m レ し テ " イ 。 FSm ア キレ スリ 
1 _ 
179 LHCATE 9。15aPRINT " mkLUCATE 9,15』 INPUT 
JsIF JC1 HR J>3 THEN 17 
18 (1。J+2) = 人 (1 。J+2)+1 
19 の 9 NEXTiLDCATE @。12IPRINT " 

aaLUCATE の 14nPRINT !" 
aaLUCATE 9,。15iPRINT " UE 


V 
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5oocosooocoepo 和 と 


タン 65528 


あく ッッ チッ ギ ペー 2 
侍 衝 衝角 例年 写 妥 全 を - 守 琶 人 玉生 且 琶 人生 を 


ンー 


多 ecoece 多 > 


「 ね え , マリ オ 。 今 日 の 晩 ご は ん 何 に し まし ょ うか ?」 

うー ん 。 そ うだ な 。 み ニー が 食べ た だ に な 」 

「 あ 。 そ れい いわ ね 。 で も カニ は 高い の よね ー。 そうだ, マリオ, ちょ っ と 浜 ま で 行っ て カ 
ニー を 採っ て 来 て よ 」 

「 メ ンド クサ イナ ア 。 じゃ 別に 今日 は カニ じゃ な 《 て も いい や 」 

「 ダ メダ メ 。 マ リオ が 言い だ し だ た ん だ か ら 6。 だ くさ ん 採っ て こない と 晩 ご は ん 抜き よ 」 
ん ル 二 」 

ある 日 の 夕方 。 マ リオ と レデ ィ ー の 間 で 上 の よう な 会 話 が あり まし て , 結局 マリ オ は カニ 
を 採り に 行か る れ を そう で す 。 で も 本 当 は あん まり 行き た く な いみ たい 。 あ っ ち へ 行っ た り , 
こっ ち べ 行っ な の 。 ふら あら 大 い て いま すず す 。 と う や 5、 な ん と か し て 遂げ だ そう と し て いる 
み だ い 。 

で も , ここ で マリ オ に 逃げ られ た だ たら カニ が 食べ られ ませ ん 。 そこで, カニ を 採っ て ト ュ ユ ト 
コ 帰 っ て くる マリ オ に , さら に 採り に 行っ て も らい まし ょ 2 う 。 

あっ , ブン プン 飛ん で 《 る ハエ さん に は 気 を つけ て 。 レディー は ハエ が 大 嫌い 。 る わっ た 
だ け で 足 が す くん で し ば らく 動け な く な っ て し まい ます 。 ほら は ほら, その 間 に マ リオ が 逃げ 
ちゃ う よ 。 
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ブロ グラ ハリ スト  (BG 画 面 デ ー タ ー は 101 ペ ー ジ ) 


1 の CLB』ICBEN21 CBBET1 。 の: BPRITEDN』 VIEM 
11 の DEFMOVE(7) =SBPRITE (5。1 96。9。1 ) 

129 DEFMOVE(1) msBPRITE(1 。 さ 。 1 日 。 の 42) 

1 さ 3 の DEFMDVE(2) mwSBFRITE(1 7。1 日 9。2) 

14 の PALETB 1 。47。4 日 。21 。 1 日 

さ の 2 の LUCATE2。BiPRINT "PUSH START KEY!" 

31 の IFBTRIB( の ) <>1BDTD さ 1 の 

さ 2 の ML し = の 18C= の 』 Bm 1 の 9 の の VIEM: BUBUBS の の 91 BUSUB さ 1 の の 1 GOSU 
Bo の 

4 の 9 の X=mRND(129)+16』YmRND (5 の 9) +1 の 9』 MeRND (2) *6+2gERA1 。 


ン 


41 の M= の Cs D=15BDBUB1110 
429 PHBITIDN1 。16」176』 MDVE1 

43 FURI= ス TD6』 PHBITIONT の 。 の ERAT』NEXT 

5 の SG=STICE( の ) :』TFS=ORB >20RM DRMDVE (D) GBDTO5 さ の 

呈 1 の 9 IFD<>8 THENERAD』 PDSITIDNB , XPHS(D) ,176』 D=B 

2 IFNODT((D=1ANDXPOB(D) =144) DR(D=2ANDXFDB(D) =16) ) 
THENMOVED 

5 の IFMODVE( ウ ) GODTO57 の 

549 IFYPDB( の ) >174THENFDSBTTIDN2 。 XPHB (の ) , 176』 BHTD25 の 
の 

5 IFYPDB( の )<26THENPDSITIHN ウ , XPDS (9) ,24』Jm の 』 BUBUB 
1 1 の : BHTD57g 

56 の BUGUB1 の の 

7 IFABB(XPDB(D) XPOUB( の ) )<16ANDAES(YFDS(D) -YPDS( の 
) )<16 BDSUB2 の の 

5B FURI= さ TO6 


MARIOKICK 5Z 


方 遊 び 方 


上 来 朝 全 部 大 ガ てき た 6RUN し まし ょ う 。 
PUSH START KEY/ 
と 姜 示 が で まし た か ? で た だ たら ユ コントロー ラー1 の スタ ー ト ポン を 押し て くだ きい 。 そう 
章夫 と が ーー ム が 始ま り ま す 。 
画面 の 下 に レデ ィ ー が 表示 きれ まし だ た ね 。 こ の レデ イー は コン トロ ー ラ ー1 の 十字 ボタ ン 
を 使っ て 左右 に 動か せま す 。 
あと は プ ブロック くず し の 有 要領 で す 。 上 の 方 で 動い て いる カニ を マリ オ が 採っ て きだ ら , レ 
ディ ー を うま てく 動か し て ハネ 反し て くだ る い 。 ブ ロッ ク 〈 く すず し と 締 っ て , 胡 あさ を 採っ て きた 
マリ オ を ハネ 返る ない と 得点 は 増え ませ ん (そう し な いと カニ が 受取 れ な いで し ょ ?.)。 点 
数 は カニ 1 匹 に つき 5 点 で す 。 「 
レデ ィ イー が ハエ に ふれ る と し ば らく 動け な く な り ま す 。 
マリ オ に 3 回 遂 げ られ る と ゲー ム オ ー バ パー で す 。 
文 ブ ログ ラム の 説明 
プロ グラ ム の 構成 は 次 の よう に な っ て いま す 。 
100-- 初期 設定 
500- メイ ン ル ー チ ン 
1000-- マリ オ 反 射 
1500-- カニ 採集 
2000-- カニ 受取 り 
2500- マリ オ 逃 げ る 
3000-- 得点 な どの 表示 用 
4000-- GAME OVER 
以上 の よう な 処理 の 中 で 一 番 重要 で や や こし い マ リオ 反射 の 部 分 を 中 心 に 説明 し ます 。 
砕 や カニ に マリ オ が ぶつ か る と 。 光 と 同じ ょ うに 反射 し ます ( 図 参照 )。 左 右 の 長 で 反射 す 
る 場合 の 処理 が 1000ー で , 上 の 和 壁 や カニ で 反射 する 場合 は 1100 一 の 処理 を 行ない ます 。 マリ 
ォ の 移動 方 向 は 変数 M に 入っ て いま すか ら , 反射 し た あと の 方 向 は 1000 行 や 1100 行 の よう な 
論理 式 を 使っ た 式 で 計算 で きま す 。 問題 は , 反射 し て か 6 次 の 壁 に ぶつ か る まで の 移動 距離 
で , これ は 簡単 な 計算 式 に は で き な い の で , 1010 一 1050 行 や , 1110 一 1155 行 の よ うに 方 向 別 
に 計算 し て , 変数 し に セッ ト し ます 。 M と L が 決ま っ た ら 1160 行 で 新しい 移動 方 向 と 距離 を 
定義 し て , 1170 行 で 動か し ます 。 
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59 の IFABS(XPOS(T) XPOB( の 2) ) で 16NDAES(YFOUS(T)-YFOUS (9 
7).<16 TIHENFLIY LO 」GUBUBI590 

6 の の IFXPOS(1 ) = の BOBUB155 の 』 GOTO62 の 

61 の 9 IF NT MVUE(1I) THENERATiPOSITIOUNT, の, の 

ム 6Z の 0 IEXT 

6 さ の IFABS(XPOUS(D) -XFOHS(7) ) く 16ANDABS(YPOS(D)-YFOB(7 
) ) く 16THENM=M+2S』 POUSTTTON7 2 の 5 」 ンコ ロワ 

64 IFNOT MOVUE(7) THENPUBITION7 。RND(129)+16 MOUVUE/ 


659 IFM:THENMmMー1 

66 の GOUTOUS の の 

1 の の 2 の =ー(M=2) * 昌 ー(MmB) *2ー(M=4) *#6ー(Mm6) 4 XmXFPUS( の ) 1 
Y=YPOUS (0 の) 

1 の 1 の IF M=2 OUR NM=B GOTOU1040 

1 の 29 IF Y<48 THENL=128: GOUTO1169 

1 ウ う 3 の し =1/6-Y』iBHUTU1160 

1 り 94 の IF Y>152 THENL=128iBUTU1160 

1 の 052 L=Y-24』 GUTO1160 

1 1 の M=ー(M=2) *4ー(MmB) *X6ー(M=6) * 昌 ー(Mm4) 2 XmXFUS( の ) 1 
Y=YFOUS( の ) 

111 の 9 NM/2 BUIH1120.1130.1140.1130 

112 の IF 144-X ぐ <Yー24 THEN Lm144-X』BOTO1156 
1125 LeYO24」BUTU1156 

113 の の IF 144-X<176-Y THEN Lm144-Xi:BUTO1156 
11259 Le1/6-YI5UIU1156 

114 ウ TF X-16<176-Y THEN Lek_16.GUIU1196 
1145 Le176 こ YiGBHTU11956 

115 の IF X-16<Y-24 THEN LmX-16』GDTO1156 

1 1 ら 5 し = イー と 4 

1 156 IFLX<2THENM=ー(M く 避 ) *6ー (55) 41BUTU1110 
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メイ ン ル ー チ ン は ,。 キー 入力 と レデ ィ ー の 移動 (500-520), マリ オ の 状態 チェ ッ ク 
(530-570), カニ 移動 (580-620), ハエ 移動 (630 一 6400 の よう に な っ て いま す 。 

それぞれ の 移動 処理 の 中 で 他 の スプ ライ ト と の 衝突 を 調べ , 意味 の ある 衝突 で あれ ば 各 処 
理 を 行ない ます 。 この 処理 は , 1500 (マリ オ と カニ ), 2000 (マリ オ と レデ ィ ー), 630 (ハエ 
と レデ ィ ー)) の 3 種類 で す 。 


文 変 数 表 


D レデ ィ の 移動 方 向 

M マリ オ の 移動 方 向 

L マリ オ の 移動 距離 (ドッ ト ) 
を マリ オ が 持っ て いる カニ の 数 
W レデ ィ が 動け な い 時 間 

ML マリ オ の 数 


SC スコ ア 
HS ハイ スコ ア 


定義 行 


1170 行 
っ 120 一 130 行 
S で 6 ニー 1550 行 
7 /N 110 行 
マリ オ の 移動 方 向 


6 4 
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1 169 DEFMOVE (の) =BPRTTE( の 1 」L/2。 の の ) 
1 17g PDBITIUNg 。X 。Y』 MOVE の 9』 RETURN 

15 の 9 IF TI=J THEN RETURN 

151 の 9 C=C+1: GUBUB1 1 

152 の 9 J=IiERAT』PHBITIUNT 9, の RETURN 

155 の H=RND (2) *4+ さ 』TFRND( さ ) > の THENRETURN 

1569 DEFMUVE(1 ) =SPRITE (14』H。RND ( さ )+1 。64 。 の 9, さ ) 

157 の 9 PUBITIUNTI 。-(H= さ ) 16-(H=7) *144』RND (5Z) +24』 MUVE 
1 』 RETURN 

2 の 9 の の IF 1=J THEN RETURN 

2 の 1 の J=IiGUBUR1129』 TFC= の THENRETURN 

2 の 2 の BC=SC+CX 呈 GDBSUBS の の じ = の 

2 の さ の IFGC>=B THENML=ML+1 EmB+1 の の の 』 は HHBUB さ 1 の の 

2 の 4 の RETURN 


PLAY"CDCD "5MLEMLー1: DUSUE さ 1 0 の 
IFML く GUTU4 の 0 の 

50T0U4 の 0 
LUCATE19。 7 PRINTSCI RETURN 

し り じ /【E ビ 2 の 4 7271MIMLI ETUW 


LUCUATE179. 3 ょ PRINTHS』I RETURN 
LUCATEB,。 ら kh PRIMTT ロ AME UVER" 
IFSC じ >HS THENHS=SCI BUSUR ス の の 
GOUTOUS の 0 
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ライ フ ゲ ー ム と いう の は 15 年 ほど 前 に アメ リカ の コン ウェ ー 博 士 が 考案 し た も の で , ゲー 
ム と いう より は シミ ュ レ ーション に 近い も の で す 。 これ は 。 ある ルー ル を 定め 。 その ルー ル 
の も と で 生物 が 誕生 , 生存 , 死滅 する の を シミ ュ レ ー ト する も の で す 。 特 に コン ピュ ー タ ー 
用 と し て 作ら れ だ も の で は な い の で , コン ビ ピュータ ー な し で も 楽し せ 事 が で きま す 。 

ゲー ム は マス 目 の 上 で 行ない ます 。 マス 目 の 大 きる は 理論 的 に は 無限 大 で な く て は いま 
せん が , 実現 不可 能 で すか ら 好 き な 大 きる を 決め ます 。 後 で 説明 する パタ ー ン を すべ て 楽し 
びに は 最低 で も 100X100 の マス が 必要 だ と 言わ れ て いま す 。 

ライ フ ゲ ー ム の ルー ル は 次 の 4 つ だ け で す 。 

まず , ある 1 つの マス 目 に 関し て , その 周囲 の 8 個 の マス に コマ (生物 を 表わし ます ) が 
ある か を 調べ で , コマ の 数 が , 

① 3 個 で 。 か つ 。 まん 中 に コマ が な い 時 に は , まん 中 の マス に コマ を 置き ます (誕生 )。 
②2, 3 個 な ら ば , まん 中 は その まま (生存 )。 

③ を それ 以外 (1 個 以下 か 4 個 以 上 ) の 時 は , まん 中 の コマ を 取り 去る ( 死 減 )。 

④ 以 上 の ルー ル に し た が っ て , すべ て の マス 目 を 同時 に 変化 る させ る 。 

①ー⑨③ の ルー ル は , 生物 が 生存 し て いく に は 適度 な 環境 が 必要 で , 誕生 の た め の 条 件 は る 
ら に きび し く , また , 生物 が 少な すぎ て も , 多 す ぎ て も 死 減 し て し まう こと を 表わし て いる 。 
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プロ グラ ムリ スト 


19 の 9 CBEN BPRITE ロ NiCLS 
11 の DEF SFRITE の 。(9。 の 9。 の 9。 の の ) m+ 
12 の PALET B ロ 。47。4 日 。 さ さ 。22 
1 さ の PRINT "ドン ノ オオ キサ ラ キメ テ の 9" サイ リ 
14 の 9 INFUT "ヨコ ( さ -2B) "WINMX 
15 の IF MX< さ DR MX>2 昌 BOT 149 
16 の INPUT "2 テ (ミー24) "IMY 
179 IF MYC3 OR MY>24 BOT 16 の 
18 の DIM (MX-1 ,MY-1 ) 
5 の X=MX/2kY=MY/2』CLB 
1 の SBFRITE の 。X 昌 +16』Yx 昌 +24 
2 BsGTRIB( の ) 
く の IF B=1 BOTD 1 の 90 
呈 4g IF B=4 THEN LUCATE X。YjPRINT CHR$(297) 』』GOTO 5 


55 の IF B=B THEN LOCATE X』YmFRINT " "Ii 
6 の SB=STICK (の ) 

7 IF B=1 THEN Xs(X+1) MOD MX 

5B IF G=2 THEN X=(X-1+MX) MOD MX 
9 の IF B=4 THEN Ys(Y+1) MOD MY 

6 の の IF Bs=B THEN Y=(Y-1+MY) MOD MY 
61 の SFRITE の 。Xx 昌 +16,Yx 日 +24 

62 の FOR I= ウ TO 2giNEXT 

6 さ の BOT 52g 

1 9 の の BPRITE OFFPs の 』G= 

1 の 1 の FUR X= TU MX-1 

1 の 2 の 9 FOUR Y= の TO NHY-1 

1 の 3 の IF ABC(BCR$(X。Y) ) =297 THEN 人 A(X。Y) =1』FPmF+1 
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この ルー ル さ え ぇ 守れ ば コン ピュ ー タ ー な し で も 実行 で きま す 。 た めし に や っ て みる に は 共 
般 か オセ ロボ ー ド が 便利 で す 。 コ ユ コンピュー ター を 使わ な い 時 に 問題 に な る の は , マス 目 の 数 
条件 の ④ で す 。 実際 に や っ て みる と わか り ま す が , 順番 に 変化 きせ て いけ な い の で , まず 
すべ て の マス を チェ ッ ク し て 誕生 , 死 減 を マー ク し て いき , チェ ッ ク が すべ て 終わ っ て か ら 
変化 きせ な く て は な ら 6 な いわ け で すか ら , マス が 20※20 位 に な る と か な り 大 変 に な り , 100X 
100 な ん て や る 気 も お こり ませ ん 。 

実は 。 これ は コン ピュ ー タ ー を 使っ て も わり と 大 変 で , 特に ベー シッ ク を 使う と スピ ー ド 
の 間 題 が ある の で す が 。 まあ な が め て いれ ば いい わけ で すか ら 人 力 よ り は る か に 楽 と いえ ま 
す 。 し か し 今度 は 広 き の 問題 が び て き ます 。 フ ァ ミ リー ベー シッ ク を 使う と マス 目 は 最大 で 
も 28X24 し か と れ ま せん か ら , この 範囲 で 楽し め る 事 を 考え な く て は な り ま せん 。 

ライ フ ゲ ー ム の 楽し み は , 広い 範囲 に コマ を バラ まい て , 時 間 が た つ に つれ て コマ が 生 殖 
し て いっ た り , 突然 減少 し て し まっ た りす る 変化 を 見 る 事 の 他 に , 色々 な パタ ー ン を 発見 す 
る 事 に あり ます 。 こ れ は アメ リカ で は か な り 研 究 き され て いて , 色々 と お も し ろ い パタ ー ン が 
知ら れ て いま す の で , を の 中 か らい くつ か を 紹介 し て お きま し ょ 2。 

パタ ー ン は いく つか は に 分 類 で き , まっ た だ たく 〈 変 化し な いも の や , 一 定 の 周期 を 持っ て 同じ 変 
化 を くり 返す も の, パタ ー ン が だ ん だ ん 移動 し て いく も の な ど が あり ます 。 中 に は ふた だ つの 
メタ ー ン の 間 を 別 の パタ ー ン が 往復 する と いう すご い パ ター ン も 研究 され て いま す 。 


文 プロ グラ ム の 使い 万 


ブ プログ ケム が 始ま る と 。 まず マス 古び が 天 き る を 入力 し ます 。 青 コ (3 一 220 マス) ダテ (3 
ー20 マ ス ) 以内 で 入力 し ます 。 必要 も な い の に 大 きく する と , を の 分 遅く な り ま すか ら , 必 
要 最 小 限 の 大 きる に し まし ょ う 。 だ た と えば 「 ブ リン カー」 を 見 だ た いな ら ば 5X5 マ ス で 十分 
の 

次 は 。 フ \ ペ ポー ジン の セッ ト で す 。 陣 面 に 填 が て ます が これ が カー ソル で す 。 ヨン トロ 
ー ラ ー 1 で カー ン ソル を 動か し , B ボタ ン を 押す と コマ が セッ ト さ る れ ま す 。 間違っ た 時 は A ボ 
タン で 消す まく と が で きま す 。 

ター ン が セッ ト で きだ ら 6 START ボタ ン を 押し て くだ る さい 。 あと は パタ ー ン の 変化 を な 
が の て いま も よう 。 

画面 の 下 に 出 て いる の は , 

GEN 何 周 期 目 か 

POP 入口 。 コマ の 数 で す 

MAX P それ まで の 最大 入力 で す 
や め た だ い 時 は STOP キー を 押し て くだ さい 。 
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1 の 4 の 
1 の 5 の 
1 96 の 
1 の 7 の 
1 98 の 
1 の 9 の 
1 1 2 の 
1110 
1 1 2 
11 3 の 
1 1 4 の 
1 1 の 
1 1 6 の 
11/ の 
1 1 の 
1 19 の 
1 2 の の 
メン の 

1210 の 
122 の 
123 
1 24 の 
門 ド 1 

1 25 の 


NEXTiNEXTi MP=F 

FUR じ Xs の 「 昌 MX-1 

FUR し LYaM 10U 7-1 

N= の 

FUHR I ぁ -1 「H 1 

X=( じ X+ エ +MX) HHD IX 

FUR Ja-1 「H 1 

YR( し LY+ サ JTHIT) 1UD MY 

IF _ ASC(SCR も (X』Y) ) 2 の 7 THEN NN+1 
NEXT』NEXT 

IF Ns3 THEN A(LXJCY)=1nBUTOU 116 
IF _N<>24 THEN AR(CX。 じ Y ) = の 
NEXT』NEXT 

P= の 

FUR Xe の 「D HKX-1 

FR Yaa 「U ThT-1 

JF JA(X。Y)wM THEN LUUOAIE XYTaFRINMT 「 


LHCULATE XYIPRINT LHR も (20/) FeFT】 
NEXTIiNEXTj ロ =G+ 1 
IF P>MFP THEN MFP= ド F 


"agBOTO 1 


LOUCLATE 0.23LFRINT BEN IIB」 OF IF 。 「/ ん .F ! 


GUTOU 1 の 50 
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文 ブ ログ ラム の 説明 
@100 一 180 行 “ 

初期 設定 で す 。 マス 目 の 大 きき も ここ で 入力 し ます 。 ヨ コ の 大 きる は 変数 MX, タテ は MY 
に や ャ トド セ もし ます 。 
@500 一 630 行 

ュ マ の セッ ト 部 で す 。 コ ント ロー ラー か ら の 入力 を 調べ で , それ に し た が っ て カー ツル を る 動 
か し た だ たり, コマ の セッ ト 。 滑 表 名 衝 な いま す 。 
@1000 一 1040 行 

ゲー ム の 準備 で す 。 配 列 A (X, Y) は ゲー ム 艦 の コピ ー, 座標 (X, Y) に コマ が あれ ば 
1, な けれ ば 0 に モット され ます 。 変数 P は 全体 の コマ の 数 (人 口 ) で す 。 
@1050 一 1160 行 

マス 目 の チ ェ ッ ク で す 。SCR$ で BG 画面 を 直接 調べ , 変化 が ある 場合 は 配列 人 の 方 を 変え 
ます 。 

ある マス 目 (CX。CY) の 周囲 8 マス の チェ ッ ク を し て いる の は 1070 一 1130 行 で , 1090, 
1110 行 で 調べ る 座標 の 計算 に MOD を 使う こと に よっ て , ゲー ム の 盤 の 上 下 と 左右 を つない 
て は まぁ 
@1170 一 1220 行 

配列 A の 内 容 を BG 画面 に コピ ー (表示 ) し ます 。 


以上 (1050 行 以降 # を ひたすら 6 くり 返す わけ で す 。 
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イダ ー 発 生 器 


er generator 


デ 


d 


ji 


グラ イダ ー 
9 


8 


ブロ ッ ク 


gueen bee (Shuttle) 


/// 


下 二 ペン ト 


ライ フ ゲ ー ム 6/ 


hat 


よ し, 次 は 第 3 チェッ ク ポ イン ト だ 。 礎 ま と 東 い な 。 
オォ オット, スペ シャ ルフ ラッ グ だ 1! し か し 方 向 が 完全 に 反対 だ な あ 。 取り に 行く べき か と 
うか …。 あー あ , 考え て いた だら 6 消 を ちゃ っ た 。 残念 1! 


文 ゲ ー ム の 説明 

コン トロ ー ラ ー を 使っ て 運転 し て , 0 一 9 まで の チェ ッ ク ボ ポイ ント を 順番 に 通過 し て 《 だ 
る い 。 各 チェ ッ ク ポ イン ト を 通過 する と 1 ケ所 に つき 10 点 加算 さる れ ます 。 

圭 々 画面 に あら われ る ハタ は スペ シャ ルフ ラッ グ で , チェ ッ ク ポ イン ト と は 関係 な く , 通過 
する と を その 時 の 残り 0 FUEL の % が ボー ナス と し て 加算 る れ ま す 。 これ は 一 定 の 時 間 が だ た つと 
消え ん て し まい ます か ら , す ば や ( 取 り に 行っ て て だ きい 。 

すべ て の チェ ッ ク ポ イン ト を 通過 する と ゴー ルイ ン 。 残り の FUEL が 得点 に 加算 る れ ま す 。 

途中 で FUEL が 0 に な る と 燃料 切れ で ゲー ム オ ー バ ー で す 。 


文 遊 び 方 


プロ グラ ム を 走ら せる と , 
PUSH START BUTTON.〆 
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ブロ グラ ハリ リス ト 、  (BG 画 面 デ ー タ ー は 102 ペ ー ジ ) 


1 の 9 DIM DX(7) ,』DY(7) 
11 の FDRI= の TDS』 DEFMVE( 1 ) mwBFRITE(6。 TX2+1 。2 44 の の ) 』N 


12 の 9 FURI=gT ロ 7』READDX(1) 。DY(I) 』NEXT 
13 の DAT ロ 。-1、1 1 2 2 1 1 2、 ロ 2。-1 1 -1 9 

14 の 9 CBBET1 , 1 』 HBsgs BPRITEDN』 CLB 

2 の の BC= の FU=5B の 9』FL= の 』N=』 Hs の gi Hm の ョ し =ーFUー5 の 

1 の CX=12:CY=12』POBITIDN 日 。112。120 

29 LUCATE5,1 の iPRINT"PUSH BTART BUTTON !" 

さ の IF STRIG()<>1 BUTD2 さ の 

VIEM:FURIm の TO9 

69 Xs=RND (26)+1』YmRND(19)+1 

27 の IFSCR も (XY) く > "BOTO26g 

2 の LOCATEX 。YaPRINTHEX ま (1) nNEXT 

299 LOCATE15。21』PRINT"HI-BCURE "』HS 

9 の SB=STRIG( の ) /4』H=(DH+ (Bm1)-(Bm2)+4) MOD4』 IFMOVE ( ロ 
H) BHTn5 の の | 

1 の AmQASBC (BCR も (CX+TDX (HK2) 。CY+DY (H2) ) ) 』 BmABC (BCR$( 
CX+DX (H2+1) 。CYTDY(H*2+1 ) ) ) 

2 の IF ns さ 2 AND Bs さ 2 GOTO5B 

5 さ の IF =25 さ OR Bs25 さ BOTD 62 の 

55 の IF (Am さ 2 AND Bm199) ロ R (Am199 AND Bm さ 32) BOBUB1 
1 9 の 9: BUTD5Bg 

6 IF (n-4BmN AND Bm さ 2) ロ R (Rm さ 2 AND B-4BmN) BOBU 
B129 の 』 GBDTD5BO 

56 王 IF n-4 ヨ <>N ロ R B-4B く SN BHTD62 の 

7 の BUSUB129 の 』 GBDBUB 1 1 の の 

5Bg IFMHVE(DH) GUTBB の 


1 
6 
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. と 表示 が 出 ま すか ら , コン トロ ー ラ ー の スタ ー ト ボタ ン を 押し て くだ きる い 。 

画面 に 0 一 9 の 数 字 が 表示 る れ ま す が , これ が チェ ッ ク ポ イン ト で す 。 

同時 に 車 $ 表 示さ る れ 動 きど し ます か ら , この 車 を コン トロ ー ラ ー を 使っ て 運転 し て くだ る 
二 泊 

運転 の し か だ は , コン トロ ー ラ ー の A, B の ボタ ン を 使い ,。 A ボタ ン を 押す と 車 は 右 に ま 
が り 、。 B ボタ ン を 押す と 左 に まがり まず 。 

ゴール イン する か , 時 間切 れ で ゲー ム オ ー バ ー に な る と , 画面 に あな だ の 得点 が 表示 され , 
再び 最初 の 画面 に 戻り ます か ら , 続け て 遊ぶ 場合 は スタ ー ト ボタ ン を 押し て くだ さい 。 


文 プ ログ ラム の 説明 
念 初期 設定 (100 一 290) 

画面 の 初期 設定 や ,、 スプ ライ ト の 定義 デー タ の 読み 込み , 変数 の 初期 化 な ど を 行ない ま 
す 。 燃料 の 量 を 変え た た い 人 は 200 行 の FU=500 を 変え て くだ さい 。 

チェ エッグ み 沙 ま ン ト の モット は , 250-286 行 で す 。 

@ メ ン ル ー チ ン (500 て 650) 

コン トロ ー ラ ー か ら の 入力 チェ ッ ク と 車 の 移動 を 行ない ます 。 

車 の 進行 方 向 (0 3) は 変数 OH に セッ ト る され て いま す 。 これ に 対し て 新しい 進行 方 向 は 
変数 H に セッ ト し ます 。A,。 B ど ち 65 の ボタ ン も 押 き る れ て いな けれ ば HOH で す 。H が 決 
まっ た だら を の 方 向 の 前 方 の 座標 に 何 が ある か を 調べ ます 。 つ まり 車 の 進路 上 に 何 が ある か を 
調べ て , その コー ド を 変数 A, B に セッ ト し ます (510 行 )。 調 べ る 座標 は 当然 の 値 に よっ 
て 違い ます か ら , 車 の 現在 位置 (CX, CY) を 中 心 に , どこ を 調べ れ ば いい か は 配列 DX (HH), 
DY( 肝 ) も DX( 遇 キキ 1), DY( 昌 土 和 1) に セッ ト る れ て いま す 。 こ 和 に よっ て HH に 関係 な く 調 
べ る 座標 は , 

CX 十 DX(H) CYDY(H) と , 
CX 十 DX(H 二 1), CY 填 DY(H+ 1) 

と いう 式 で 表 わ せ ます 。 これ で 車 の 前 方 に 何 $ も な い 時 は , 車 を 移動 きせ ます 。 何 か あっ た 場 
合 は . それ が ハタ な ら 1100 行 , チェ ッ ク ポ イン ト な ら 1200 行 の 処理 を 呼ん で か ら 車 を 移動 き 
ぜ ま す 。 

メイ ン ル ー チ ン を 1 回 まわ る 間 が 1 単位 時 間 で , FUEL を 1 消費 し ます (620 行 )。 これ で 
FU=0 に な る と 燃料 切れ で ゲー ム オ オーバー ですから, 1600 行 に 飛び ます 。 

る スペ シャ ルフ ラッ ク 処 理 (1000 一 1100) 

1000 一 1040 行 が ハタ を 書い だ た り 消 し た りす る 部 分 で 。 ハタ が 出 て いる 間 は 変数 FL が -1 に 
セッ ト さ れ ま す 。 ハ タ の 座標 は 変数 FX, FY に セッ ト し ます 。 
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e だ 4 
6 の ウ の 
61 の 
615 
62Z の 
ら さ の 
64 の 
650 
1 の の 
1 の 1 の 
1 9 の 
1 の さ の 
1 の 4 の 
1 1 
TURN 
1 2 の 0 
+ <10 
INT 
1 マン 


12 さ の N= 


1 2 人 4 の 
15 の 
1510 
1 6 の の 
1610 
1 6 と の 
1 6 さ の 
164 の 
1 65 の 
1669 
17 の の 


IF HH=H BU「U 610 

FUBITIUNMH XFHS(HH) .YFUS(DH IE 0 り H 

MOUVE Hi UH=H 

CX=C じ X 二 (HH= さ ) (HH=1) CCY=CY+ キ (HE の ) (Hm ) 

FU=FU-iiIF FUK1BUIU1600 

IF FU<L 5UBUE1OO0 

LULATE の 21」PRIN FUEL FU 。 「 

GOTOU ら 0909 

し = し ー59: IF FL BUTU1O40 
FX=RND(26)+1pFY=RND(19) 1 
IFGLR も (FX FY)OXK> | "THENFLe9jRETURN 
FLa-ihiLHUATEFX、FYiFRINTLHR も (1997JRETURN 
LUCATEFX FTuFRKINT FLsOIRETLRU 
LUUATEFX FYIFRINT' BCLeGLTFU/10.BUBLUE1 / の 0」 ド RE 


SCsSC+1 の 』 BUSUR1 7 

IF n-4B=N THEN LUCATECX+TDX(Hk2) ,。CY+TDY(HK2) 』P ド R 
"LBHTU1 2 うり 

LODATECXTDX(Hr2+T1) 、LYIDY(HM2LUD1FRINI 
N+1』IF Nm1 BOTU1S00 

RETURN 

ERA OHiLOCATE19.5hPRINT "FINISHI 1 "ISGCmSC じ +FU 
GOSUB1 7 の 1 GOUTOU1 6 

ERA OUH 

LUICATE 5 BIFRINT'IIIE UENK 

LUCDATE 2.6uPRINT VHUR BEDRE 18B 10L」 FUINIST 
IF GLK く mHB BUIU165 り 

LUCDATE 5.7IPRINTUITI B LUUSL REEURUI 」「5=5O 
LHCAIE B. 9iFRINT TRYV_ RBAIN | 

BOTO 2Z00 

LUCATEO.22 FRIJNT BLHRE IL | IFRETURN 
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1100 行 が 車 が 通過 し た 時 の 処理 で , FU の % を 得点 に 加算 し , ハタ を 消し ます 。 
信 チ ェ ッ クボ ポイ ント 通過 処理 (1200 一 1240) 

和 点 に 10 点 加算 し て , チェ ッ ク ポ イン ト の 数 字 を 消し ます 。 最後 の チェ ッ ク ポ イン ト (9 
番 ) が 消え た ら , 1500 行 か ら の ゴー ルイ ン 処 理 に 飛び ます 。 
@ ゴ ー ル イン , 燃料 切れ (1500 一 1660) 

ゴー ルイ ン の 場合 は 残り の FUEL を 得点 に 加え ます 。 

符 点 を 表示 し て , ハイ スコ ア の 更新 を 行ない , 200 行 に 飛び ます 。 


文 変 数 表 
CX, CY 車 の 位置 
OH, H 車 の 進行 方 向 


FU 残り 燃料 

FX, FY スペ シャ ルフ ラッ ク グ 位 置 
N チェ ッ ク ボ イン ト 番 号 
SC ペコ アデ 

HS ハイ スコ ア 


72 ファ ミコ ン ソ フト 集 001 


フタ 二 ヨコ ツク の ご PU 


コン ピコ ー ツ ー に は ゆす て の 還 騰 に お る チップ (全て こも いう ) ガ あ る 。 「C 
ビリ U リ 」 とみ 「MFPU」 と 上 れる も の だ 。 

拍 本 の 8 ピッ に の パソ コン は 人 まで ほとんど が ガ が 「 ノ 8 の 2 」 み 「68929」 を 
使 つ て い 六 。 ピ ロー600|, 86, や Xー 1 や MZ シ リー ズ ガ 「Z89」FMー 
/ や Gー は 689 」 を 還っ て し た 。 

ご ころ C。 「 ど リフ プル 」 こ とこ し う ユ コン レビ コーツ ター を 知っ つて し る な 。 あ の 「 
ーー に ラフ ラン ナー 」 な ん が 名 め の て 走っ だ ど と メ リカ の コン ピコ ー タ ーー だ 。、 この 「 ア 
ソノ ル 」 は 652/」 こし うり FU を まっ て いろ る ん だ ど だ 。 

ーー まり , ビッ ト の UFU で は 「 2Z60」 こ て 6899.」 と と 0502 の 
三種 類 が 世界 の 主流 ど つ だ わけ だ 。 

この ノア ミニ コン, 実は 6592」 の カス ツノ (特別 則 ) チリ ソリ プ を 任 つ て い 
そ 。 

「G592」 こ とこ いう PU 自体 は , 他 の 2 つづ に 上 L パ る こと こ 少 し 人 性能 グ 意 い けど ., 
良い 点 も いろ いろ あっ て 。 ゲ ダーム に は ちょ うど いい FU と し う 人 人 も いる 。 何 
より の , 名 機 「 ア ッ プ ル 」 が それ を 証明 し て いる だ ろう 。 

ソコ ン を 持つ て い ピ つて る 友達 に , 「 ぽ この は アッ プル と 同じ る て 650 
ど を 使 つ て る ん だ 」 と 圭 つ て の みよう 。 で て も, 問 連 つて や 「 ろ こせ ん ご りゃ や ぐに 」 
な ん て いわ な いよ うに 。 プ ロフ ノラ マー 全 間 で は 「 ろ ここ ご まる に 」 と 呼ば な け 
れ ば いけ な いん だ 。 ち な み に 「Z89」 は 「 ぜ つと は ち ま る 」 ま だ は ほ 「 ぜ つば 
ち 」 ' 68909」 は 「② ろ こ は ち まる ぐ て 」 ガ 「 ま る ご 」 と ざん だ 。 
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Ge 己 N SR 「 
きり“~ 4 だ の に 提 遇 か が ト さこ ニン 


ぇ 一 と 今度 は 誰 び だ ろう 。「SEIKO」 か 。 ん 一 , S は どこ だ 。 うわ っ , あん な 遠く か 。 え っ ち 
ら お っ ちら , あ , まず い 。 あ いつ も S を 狙っ て る 。 と どっ ち が 早 いか 。 お っ と いけ な い , 間 違 
っ て 違う 文字 を 拾っ ちゃ っ だ 。@ マ ー ク は どこ か な …。 

文 ゲ ー ム の 説明 

この ゲー ム は 2 大人 で 遊 ま あみ カルタ 取り みた いな ゲー ム で す 。.2 人 が それ ぞ れ "* と ご 士 
印 の 。 何やら シャ クト リ 虫 の よう な や つ を コン トロ ー ル し て , 指示 る れ た 単語 (名 前 ) の 文 
字 を 順番 に 拾い 集め ます 。 

文字 は 順番 に , た と えば 「SEIKO」 な 6 ば S か ら 順 に , E, 1I, … の よう に 集め て いき ま 
す 。 途 中 で 間違っ て 関係 な い 文 字 を 拾っ て し まっ た とき は , @ マ ー ク を 探し て 拾っ て くだ る 
い 。 こ の 文字 は ,。 キー ボー ド の “DEL キー の よう な も の で , これ を 拾う と その 前 に 拾っ 
た 文字 を ひと つ 消 せま す 。 

間違っ た の を を その まま に し て どん どん 拾い 続け て し まい , 指定 され た だ 名 前 の 文字 数 より 多 
〈《 な っ て し まう と , せっ か くく 拾っ た 文字 が 全部 (その 名 前 の 分 だ け で す ) 消 を ん て し まい ます 。 

ひと つ 名 前 が 完成 する と , 湊 の 名 前 が 表示 され, 先 に 5 人 の 名 前 を 集め た 方 の 勝ち で す 。 
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プロ グラ ムリ スト 


112 DIM EX(1) DPY(1) IX(1) 70 HO) 1) IIW( 
2 中 (1) . じ ま も (1) 、 生 (// 
12 の 2 FOR1I= の TO7』READN 和 まま (T) NEXT 
132 DATA SEIRD。HIROMI 。ARINA。NAORO 』 YURIRO MONOKO RT 
SUMTI 。 AIKO 
14 の C$ も (の )= リ "KaC も (1)=「+ リ 
15 の の H( の ) =BiN1 ま (の ) =NR$(RND (BB) ) 』 (の ) = の 
H( 1 ) = N1 ま (1 ) =NA ま (RND (日 ) ) : (1 ) = 
CLSsFOURT=64TU7 
X=RND(26)+1』 YsmRND (2 の ) 
IFSGCUR$ も (XY7)< く 5 BHTIU240 
LHCATEX 。YsiFRINTCHR 和 まま (IT)sNEXT 
FORF= ウ TOD1』 GHSUB2 の OO BUHSUB2S の NEXT 
FOURF=2TOU1 
SG=STICK(F) 』 IFG=mTHENS=H(F ) 
X=CX(P) 』 Y=CY(P) 
IFS=1THENX=(CX(P)+1) MOD2BI GOUTOUS60 
IFG=2THENX= (CX(P) +27) MOD2BI BHTOUS69 
IFS=4THENY=(CY(FP)+1) MOD22 5 GOTO56 の 
IFSG=BTHENY=(CY(FP)+21) MOOD 
仙 生 =BCR 征 (X4Y) 
IFA 和 も = リ +IORRR ま mkUGOTOU7ZS5 の 
CX(P)mXuDY(F)e=YILUUATEXJYuFRINI Ii 
IF も = リリ BOTOU 68 
6 の 9 の IFA も =!" り THENN2 も (PF) mLEF 和 中 (N2 も (PF) 。LEN(N2 も (FP) ) -1) 
s BHTOU620 
ら 61 の の N2 ま も (P) NG も (F ) 内 征 
62 の の IFLEN(N1$(P) ) く LEN(N2$(P) ) THENN2 ま (PF) = 

ガー ル ハ ント Z5 


JUL UL UL UL UM UL ULU LO OU DD り D し DPD DD に 
ロロ ひけ 口 ちや 上 リー ビー 6 けけ 0 ち し いひ 
ら DDMQ GRG Q iQ 6 DO 6 5 5 6 


EC 
3 
6 


文 遊 び 万 


それ ぞ れ の プレ イヤ ー は , コン トロ ー ラ ー の 1I と IT を それ ぞ れ 使い ます 。 

ゲー ム が 始ま る と , 画面 中 に アル ファ ベッ ト 26 文 字 と , @ マ ー ク が 1 つの 計 27 文 字 が 乱数 
で バラ ま か れ ます 。 を の あと て で 画面 の 左右 の 端 に 各 プ レイ ヤー の シャ クト リ 必 表 示さ る れ , 
す で 動 き 始め ます 。 

画面 の 下 に は 最初 の 名 前 が 表示 され ます 。 左側 が プレ イヤ ー 1 (コン トロ ー ラ ー1) で , 右 
が の キス ま 。 

シャ クト リ の コン トロ ー ル は コン トロ ー ラ ー の 十字 ボタ ン で 行ない ます 。 ボ タン を 押し 
た 方 に シャ クト リ 忠 が 進ん で 行き , 何 か 文 字 に が つ か る と , それ を 拾っ て , その 文字 が 画面 
下 の 名 前 下 に 表示 る れ ま す 。 

画面 の 上 下 と 左右 は 続い て いて , 右 に 向っ て 進ん で い 〈 と , 左 か ら 出 て きま す 。 

文 プ ログ ラム の 説明 
人 初期 設定 (110 一 270) 

配列 の 宣言 や 。 名 前 の デー タ 読 み 込み , 変数 の 初期 化 を も 行ない. アル ファ ベッ ト を 乱数 を 
使っ て バラ まき ます 。130 行 の デー タ 文 を 変更 し て , た と えば 名 前 の 代わ り に 英語 の 単語 に で 
も し て ぢ セ 〈 と , 遊ん で いて も 勉強 し て いる よう に 見 えま す 。 
⑱ メ イン ルー プ (500 一 750) 

大 き な FOR-NEXT 文 で , 各 プ レイ ヤー の 処理 を 順に 行ない ます 。 ど ちら 6 の プレ イヤ ー の 
処理 を し て いる か は FOR 文 の 制御 変数 で ある P で 表 わ る れ ま す 。P が 0 の と き は プレ イヤ 
ー1, P が 1 の 時 は プレ イヤ ー 2 の 処理 で す 。 

メイ ン ル ー プ は 大 きい の で 分 け て 説明 し ます 。 

510-550 行 が コン トロ ー ラ ー か ら の 入力 チェ ッ ク で , 移動 先 の 座標 を 計算 し ます 。 是 ) 
は シャ クト リ 中 の 進行 方 向 で , 1 が 右 , 2 左 , 4 下 ,。 8 上 と な っ て いま す 。 コ ント ロー ラー 
の 十字 キー が 押 き れ て いな けれ ば 前 回 まで の 進行 方 向 に し た が っ て 移動 し ます 。 

560 一 600 行 は 移動 先 に 何 が ある か の チェ ッ ク で す 。 何 も な い (スペ ー ス ) 時 は を の まま 
移動 , 相手 の シャ クト リ 虫 で あれ ば 停止 , 何 か の 文字 な 6 以 下 の 処 理 に 進み ます 。 

AZ な ら 6, 保存 用 の 文字 列 N 2 $ (P) に その 文字 を つけ 足し ます 。 これ で N 2 $(P) が , 
N 1 $(P) 一 指示 きれ た 名 前 が 入っ て いる 一 と 同じ に な れ ば 1000 行 か ら の 処理 を 呼び , 新 し 
い 名 前 を セ モット し ます 。 

この 文字 は 画面 か ら 消し て , すでに 新しい 場所 に 書き 直し ます 。(650 一 670 行 ) 

N1$ が N2$ よ り 長 く 〈 な っ た 場合 は N2 $ ぉ を クリ ア し ます 。 
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6 さ の GUSUBZ の 2 

64 の 9 IFN1$ も (P) =N2 ま (F) GOSUB10 の 0 

65 の X=RND(2B) ! YmRND(Z デ ) 

66 の IFBCR も (XY)< く > "BOTOU630 

6792 LOCATEX』YIFRINTA 名 

68 の Xs=TX(F)iYmTY(F) 

69 の 2 IFGCR$((X+1) MOD2B 。Y) =C ま (P) THENTX(F) =(X+1)FHOUDB 
7 の の IFSCR ま ((X+27) MOD28 。 Y ) =C も (PF) THENTX(P) m(X+g7) MOD 


の IFSCR も $(X 。(Y+21) MOD22) =C ま (PF) THENTY(F ) =(Y+ ジ 1) MOD 
フ 72 の IFSCR も $(X 。(Y+1) MOD22) = も (F) THENTY(P) =(Y+1) MOD デ デ 


73 の LOUCATEX。YiPRINT" "ii 

74 の 9 LODCATECX (PF) 。CY(P) iPRINTC ま (P) 』kH(P) =G 

759 NEXT』 GOTD5 の の 

1 の 9 の M(P)=M(P)-1』 IFM(P) =2GDTD155 の の 

1 の 1 の N2$(P) ='U』N1$ も (P) mNA$(RND (BB) ) 

192 の 9 BOBUB2 の 9IRETURN 

15 の 9 PLAY"C1EBDEF"』CLS 

1519 LOCATE7,5BIPRINT"PLAYER"mFP+18" MIN ! 中 

152 の END 

2 の の LUCATEー(Pm1) *14。224PRINTN1$(P)+ リ リョ 

2 の 1 の 9 LUCATEー-(Fm1)*14。24IPRINTLEFT も (N2$(P)+ リ D 
6)4 リ アト "IM(P) "こつ リ 1 

2 の 29 RETURN 

25 の の CX(P) =PX27mCY(P)=1 の ITX(P) SCX(P) 』TY(P) mCY(P) +2 
2519 FORImCY(P) TUTY(P) 』LDCATECX (PF) 。 TIPRINTC ま (P) 』IN 
EXT』RETURN 


ガー ル ハ ント 7ZZ 


@ な ら ば N 2 $ の 右端 の 1 文字 を 消し ます 。 

680 一 740 行 が シャ クト リ 忠 の 移動 で ,. まず 尾 を 消し ます 。 新しい 尾 の 座標 を し ら で て 
(690-720),。 その 座標 を TX(P), TY(P) に モッ ト し ます 。 それ か ら 前 に 計算 し て お いた 新 
し い 移 動 先 に 頭 を 書き ます 。 

@ 表 示 用 ルー チン (2000-2020) 
画面 の 下 に 名 前 の 文字 列 。 N 1 $(P) と N 2 $(P) と 残り の 人 数 を 表示 する ルー チン で 


す 。 
文 変数 和 表 
P プレ イヤ ー 識 別 用 


CX(P), CY(P) シャ クト リ 虫 の 頭 の 座標 
TX(P), TTY(P) シャ クト リ 虫 の 尾 の 座標 


H(P) シャ クト リ 虫 の 進行 方 向 
N 1 $(P) 時 

N2 $(P) 名 前 格納 用 

NA$(n) 肝 語 デー タ 

M(P) 残り 人 数 


G ZN に R 
ST て っ に ag- ン TO っ 。、 >- ッ 
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だ 


ョ コン 回 この テーマ AO (0 5」『 


コン ピコ ュー マー マ _ー ア つて ご こん な イメ ー ジ ガ こ いう こと, 上旬 的 に 「 根 陸 」 つ 
まり , ね つか 5 障 い こい う 返 事 ガ 返っ て ご る 。 

眼 送 を ガ け て いて , ふと り ぎ み ( 軍 動 不足 ), 色 は 青白 く (日 光 に あ だ つ て な 
し り , 身なり に み ま わ ざ ず 髪 は ポ ボサ ポ サ 。 指 に は ゲー ムダ コ が でき て いる 。 ご こう い 
う 人 は 少々 問題 だ ね 。 実 は , 大 学生 や や 高校生 に こん な 人 が 多い ん だ 。 

まさ ガ が 君 は 違う だ ろう ね 。 

コン ピュ ユー マー を 仕事 に し て いる プロ プラ マー や オペ レー ター で さえ , 1 時 
間 に 10 分 が ら 20 分 は テレ ビ か ら 目 を 離し て 休ま な けれ ば いけ な いよ うに な つて 
き て る 。 コ ン ピ コ ユー マー 自体 が 台 い ん で な こ て , 長 時 間 同 じ 勢 で い だ どり , テ 
レビ を 見 て いる と , 目 や 体 に と つて も 良く こない 事 が 医学 的 に は つき り し て いる 
ん だ 。 “ 

や つば り 太 陽 の 下 で 思い つき のり あばれ て , コン ピュ ユー ター で も 適度 に 遊 選 。 
それ ガー 洗 だ 。 

プ ハ リッ フフ や , ノロ ノラ ん 上 て で 行き づま つ だ 時 , 体 を 勤 の ず 事 が 気分 転 抱 に な 
り 。 ガス つて つま く ぐ 行 < こ 時 が ガ し 。 

コン ヒビ ュー ター し 知ら な いな ん て 。 や つば り 「 根 了 用 」 と 上 W ば れ て も し よう 
が な いね 。 マ マルチ 人 間 で ,。 ス ポー ツ も で きま る, コンピ ュー ター も 使え る つて い 
う の パ 。 や で つ し 、 ナ フレ ん だ よ / 
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の ケタ プ スウ プ ラ イレ テ ゾ 2 タク ク ク 語 


2 うす 4 ! ジ アン ナグ クラ つが そ 上 も じ ゃ 3 1 すす 7。 | プア ああ ん, ひとつ に な っ ちゃ 
つま と も うう 000 シグ や っ る はり ひと よ つ だ な か な 。、 どうも 5 し 7 は ん る き を うだ ん 。 か た 
も すす は あり も うだ を 。 キ ます 97 8 で デア うだ .、「 ゼ 、 ぜ 
や っ だ , ハタ 2 本 だ 。 4 3 は まち が いな か ろう 。 あ と 使っ て いな い の は … と , 4 3 6 9。 
「 生 す 2b Sp の に あお グーン 二 まき で D か か な 。、「 ビ 、 で ゼ 。 だ ) 「 み リラ リテラ 。 や っ 
だ , ハタ 4 本 。 7 回 目 か 。80 点 だ 。 ダ ブル を か けれ ば よかっ た か な 。 よし 次 だ 。 
支 ゲ ー ム の 説明 

MOO は , ヒッ ト アデ ンド ブ プロー とか, マス ター マイ ンド な ど と も 呼ば れる ポピュラー 
な ゲー ム で すか ら 知 っ て いる 人 も 多い と 思い ます 。 本当は 人 間 が 2 人 で や っ て 競い 合う も の 
で す が , 相手 が いな い 時 な ど コ ンピュータ 相手 に や る の も いい も の で す 。 人 間 相 手 ど と , た 
ま に (よく 〈《 ? ) セン ト を 間違え た りす る の で , か えっ て コン ピュ ー タ と や っ た 方 が いい の か 
6 し れ ま せん 。 特 に, 何 回 や っ て も 当て られ な いと き の あ の 冷た い 視 線 に 苦し まな く て いい 
の で , 練習 用 に ちょ うど いい か も しれ ませ ん 。 

ルー ル を 知ら な い 人 の た め に , この プロ グラ ム で の ルー ル を 簡単 に 説明 し て お きま す 。 

まず , コン ピュ ー タ が 4 ケタ の 数 を 決め ます 。 この 数 字 を コン ピュ ー タ ー か ら 返 っ て くる ヒ 
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プロ グラ ムリ スト 


1 の の 
11 の 
1 2 の 
1 3 の 
1 4 の 
15g 
1 6 の 
さ の の 
さき 1 の 
さ Sg の 
ささ の 
さ 4 の 
こら の 
さら 6 の 
さ / の 


CH 
SS ヽ 、0 
6 SS 


引 


63 


で 


HH LU HI UE OU OU 
JJ ひい ひ HH お 析 D ご 
S SS SS 6 Cy 


1 
0 
で 


DIM N(⑦) 。8(10) 
CLg 

PALET B の ,47。4 日 。 さ 9。22 

FOR 1=1 TO 1 の 

READ (1{) 

NEXT 

DQTA 1 の の,。B の の , 5 の 。 さ の の 。 2 の の 1 の の 日 9。69。 さ の 。1 の 
FOR TU=1 TO 5 

CLS 

FUR 1I=g TD 9』N(I)=I』NEXT 

AN ま = リ リ 

FDR Is9 TO 6 BTEP -1 

RsRND (【+1 ) 

AN*=AN ま +HEX ま (N(R) ) 

N(R) =N(1 ) 

NEXT 

LOCATE の 。 の riPRINT "BCORE" ョ BC 

FOR T=1 TO 1 の 

LUCATE 15kPRINT "472 / スウ ミー ラー イル テ ! リ 1 
2 て:L レ バケ ケル 

LOCATE 17。155』PRINT 人 ま 』 

K ま =TNKEY$ も (の ) 

IF KsCHR も (1 さ ) THEN D=15BOT 620 

IF に = リリ THEN PLAY "C1E"D=2IGHTD 62 の 
IF ASC(K ま ) く 4 HR ASC(K) >57 BOTD 呈 49 
=R TGBHT あ ( 仙 + に 事 4 ) 

LOCATE 17。155PRINT 谷 

FUR Is の ウ TO 3 さ giNEXT 
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ント を 使っ て 当て る わけ で す 。 こ の 4 ケタ の 数 は , 0 一 9 まで の 数 を 1 回 だ け 使 っ て 決め ら 6 
れ ま す 。 つ まり 2234 の よう に 同じ 数 が 重複 する 事 は な いわ け で す 。 

コン ピュ ー タ ー の 入力 凌 求 に も た が みて 4 ケタ の 数 を えみ し ます 。 す ずる と ュ コンビ ピュータ は 自 
分 が 決め だ 数 と , この 数 を 比較 し て , 決 の よう な ヒン ト を 返し ます 。 

@ 数 字 と ケタ が 合っ て いれ ば , ハタ 

@ 到 字 は 合っ て いて , ケタ が 違え えば, リンゴ 

だ もえ は コンピュー ター が 寺 あ の お 二 ま う す 4 て 、 入力 し た 数 池 が 9345 なら 56。、]1 は ビ 
ッ タ リ 合 っ て いま す が ,。 3 と 4 は ケタ が ずれ て いま す 。 5 は 完全 に は ずれ で すか ら , 結局 ハ 
次 まし (1) と リン シー スク 打 (うし 4 NMIKRM ド よし て 返さ きれ ん ま す 。 この ヒン ト を も と に し て , 
さら に 推理 し て 数 を 当て る わけ で す 。 

た だ し 無制限 に 入力 で き て は 面白 く (あり ませ ん か ら , ひと つの 問題 に 対し て 答え られ る の 
は 10 回 どけ に し ます 。 最初 は 大 変 か も し れ ま せん が , 慣れ て くる と だ いだい 8 回 以内 で 当て 
ら 札 る よう に な り ま ず 。 

あと , この プログ ラム で は 何 回 目 の 入力 で 当たっ た か に よっ て 決 の よう な 得点 が も ら 6 えま 
呈 

1 回 目 で 当たる と ( こ 穫 を 偶然 と いう ) 1000 点 。 以下 。 800。 500, 300。200,。 100, 80, 
0. 30 0 な の さくい まず すず 。 

る さら に 答え に 絶対 自信 が ある 時 は , “ダブ ル " が か けら れ ま す 。 これ で 当 だ れ ば 上 の 得点 の 
2 借 が も ら え ます 。 た だ し は ずれ る と , それ まで の 得点 は 0 に な っ て し まい ます 。 問題 は 5 
間 だ きれ ます か ら 6, これ で 友人 と 点 を 競う の も いい で し ょ 2 う 。 


福 数 字 の 入力 の し か た 


毎回 画面 や や 下 に 

まこ だ / で 本 本 まこ テー イン / キキ Y773 
と 表示 る れ ま す 。 入力 は 数 字 以 外 に は 受け つけ ませ ん 。 1 文字 入力 する ご と に , 数 字 が ひと 
ケタ 左 に ずれ て いき , 5 文字 以上 入力 する と 左端 の 1 文字 が 消え て いき ます 。 
匹 し く 4 ケ 角 入力 て きだ 5, RETURKN キー を 可 上 し まず す 。 こ の 時 タダ アル を か けり お も たき は 
RETURN の 代わ り に スペ ー ス キー を 押し て くだ さい 。 


壇 ブ プロ グラ ム の 説明 
念 初期 設定 (100-160) 

人 数 字 決 定 (330 一 380) 

@ 解 答 入 力 (510610) 
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61 
ら 6 と の 
ら 6 さ の 
640 の 
ら 6 ら 50 の 
66 の 
ら 67 
6Bg 
67 の 
7 の の 
/10 
ノロ 
7 さ 30 の 
/4 の 
7/ ら 5 
Z6 の 0 
77g 
78B 
7 
B の 
1 
こめ 4 り 
ロ さ の 
B4g 
BS の 
6 
B7 の 
BB 
B70 の 
9 の 


BOT 554@ 
LUCATE 1 の 。TiFRINT 

LUCATE の 。15』PRINT " ! 
H=』 BE 

FR Is=1 TO 4 

FOR Js1 TO 4 

TF MID ま (AN*。T。1) く >MTD( 全 1) GOUTO 7 の の 
IF I=J THEN H=H+1』BUTH 7 の の 

B=E+1 

NEXT』NEXT 

HT 利 計り 

IF D=2 AND H<>4 THEN BC 

IF H=g BOTO 79g 

FOR Is1 TO H 

HTmHT+CHR 和 (199) 

PLAY "B1" 

NEXT 

IF H=4 BODSUB 1 の giBODTU B40 

IF B=g BOTO B40 

FOR Is1 TO B 

HT=HT あ +CHR (21 王 ) 

PLAY "E1" 

NEXT 

LUCATE 15,TIPRINT HT* 

IF Hm の AND Bm@ THEN PLAY "CS" 

NE XT 

LUCATE d。 の giPRINT "BCORE"』BC 

LUCATE 5。1 さ 』PRINT "ANBMER= "RaN』 

FAUBE 

NE XT 
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4 ケタ の 数 字 の 入力 ルー チン で す 。 数 字 は 文字 列 に し て A$ に セッ ト し て 返る れ ま す 。 
⑱ ヒ ント 計算 (640 一 700) 

4 ケタ の 文字 列 を それ ぞ れ 比較 し ます 。 人 間 だ と 間違い や すい 部 分 で す が …。 ハタ の 数 は H, 
リン の 数 は B に セッ ト さ れ ま す 。 
ヒン ト 出 力 (710 一 850) 

入力 し た 数 字 の 横 に , ハタ と リン ゴゴ を 表示 し ます 。 
念 得点 , 解答 出力 (870 一 890) 

解 谷 を 出力 し た あと 入力 待ち に な り ま すか ら , 好き な キー を 押し て くだ さい 。 次 の 問題 に 
うつ ます 。 


文 変 数 表 


AN$ コン ピュ ー タ ー の ゆめ 光 ぬ た 数 


A$ 入力 し た 数 

TU 問題 番号 

す 何 回 目 の 入 力 か 

H ハタ の 数 

B リン ゴ の 数 

っ と 得点 の ケ ぐ ノ スウ ジ ラ イレ テ 。 2 ク ク ク 詩 
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91@ END “ 

1 の 929 PLAY "D1ECEG" 
1 の 1 の 9 BCsSC+8(T) *D 
1929 T=1 の iRETURN 


入力 言 めい ぢ る 

コン ピュ ユ ュー ター が 人 間 の 命令 を 受け 取る の に は どう いう 方 法 が びあ る だ ろう 。 

ファ ミコ ン で は キー ボー ド を 作 つ て 命令 を 打ち 込め ば いい ね 。 ゲ ー ム を し て 
る 時 は コン トロ ー ラ ー を 使う ね 。 こ の コン ト に ロー ラー に も いろ いろ ある 。 ショ 
イス ティ ッ ク と いう の は , ゲー ムセン ター の アー ム 機 本 に つい て る や つと 同じ 
だ 。 ト ラッ クボ ポール と 言 つて , 丸い 大 き な 玉 を 手 で まわ す も の も ある 。 

パソ コン 用 だ と , デジ タイ ザー や マウ ス (トラ ツク ポール を 逆 向 け に し た だ も 
の と 思え ば いい ) な ん て も の が ある 。 最近 ワー プロ 用 に 「 ま 書き 文字 認識 ボー 
ド 」 も 製品 化 さ れ だ 。 ポ ボー ド に 字 を 書 こ と , コン ピ ユ ー ダ ター が それ を 読み 取 つ 
て これ る わた 。 

ライ トペ ン も ある 。 テ レビ の 画面 を これ で 押す と , 画面 上 の どこ を 押し だ か 
わ み る も の で MOX で も 全 える 。 

クー ラー や 浴 蔵 庫 に は 「 温 度 セ ン サ ー,, 自動 ドジ な ら 「 光 セン サー」 や 「 重 
量 セ ピン リー」 ガ つい て し て 骨 度 や 。 光 や 、 生 ざさ の 変 (( を コン ピュ コー ツー に 克 
えて これ る 。 

コン ピュ ー タ ー と コン ピュ ユー ター を 結ぶ に は , 電話 を 使 つ た だ 「 音 響 カ ブラ 」 
や 。 「 ノア ィ イー を つつ 。 

で も 何より か っ つこ いい の は コン ピュ ユー ター に 話し か ける だ け で いい 「 背 声 説 
識 」 法 だ ど 。 こ れ は 今 , 日 本 の 各 メ ー カ ー ガ が 邊 死 で 開発 し て いる けど , まだ まだ 
高価 な も の だ 。 そ うい う 意 味 で は , 何 を 話し て いる ガ は 識別 で まき な いけ ど , 声 が 
て いる か どう 力 を 由記 で きる ファ ニコ ン (コン に ロー ラー TI に マイ フフ ガ が つい 
て いて , Ver.3 で は それ を 使 つ を ゲー ム が で きる ) は , 時 代 の 最 先 端 を 行く マ 
シン こも や 計 え る 1 / 
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FRECTION 


え ぇ 一 と 。 こ こ か ら ボ ー ル を 投げ る と , この 坪 に が ポ つ か っ て で っ 才 玉 いっ る 芝 あ みち も に いっ 
て ……。 ああ, わか ら な い 。 時 間 も な い か ら , 投げ て みる か 。 


ゲー ム ボ ー ド に は 壁 が いっ ぱい 。 こ の 中 に うま く ボ ー ル を 投げ 込ん で , ハタ に 命中 る せ て 
くだ る 。 で も 。 この 壁 は ポー ル が ぷら か る と , 向き が 変わ っ て し まう ん で す 。 す で 近く 《 く の 
ハタ な ら 当 て や すい けど , 壁 で 何 回 $ は ね 返っ て か ら ハ タ に 当たっ た 方 が , 点数 が 高い ん で 
す 。 で も 考え て いる 間 に も 時 間 は 経過 し て , あま り 考 えす ぎる と 時 間切 れ で ゲー ム オ ー バ ー。 

さあ, 君 は ボー ル の 動き を 読み 切れ る か ! ? 
文 ゲ ー ム の 説明 

ゲー ム ボ ー ド の 周囲 の レー ル の 上 を , ボー ル を 動か し て 好き な 所 で 発射 し て くだ さい 。 ボ 
ー ル は , そこ ら 6 中 で 胡 に が つか りな が ら 6 飛び 回 り ま す 。 そ の うち に うま くく ハタ に 当たれ ば , 
壁 に 当たっ た 回 数 X10 点 が 加算 る れ ま す 。 ハ タ を 全部 消す ほ 一 面 ク リア で , 礎 の 数 が 少し 
増え て 次 の 面 に 進み ます 。 壁 の 数 は 1 面 が 100 個 で , 20 個 ずつ 増え て いき , 7 面 で 100 個 に も 
どり ます 。 1 面 ク リア ご と に ,、 残り 時 間 が ポー ナス も し て 笛 上 に な り ま す 。 
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ブロ グラ ハリ スト (Be 画面 テー ター は 103 ペ ー ジ ) 


1 の の DIN Me( さ ) 
194 CBBET1 

195 PALET B @。47。4B。 さ さ 。4 昌 

1 の 6 PALET B 1。47。4 昌 4 日 。 4 

197 PALET B 2,47。22。4 昌 。4 昌 

119 CLBICBEN さ 』 VIEMI BPRITEDN 

14 の 9 FURI= の TU さ 』READ iM も (1T) =CHR も (8) 』NEXT 

159 DATA 237,2 さ 9.。2 さ 3 日 24 

1 6 の DEFBPRITEO。 (2 。 の 。 の 。 の 。 の ) msDHR も (2 の 7 ) 

さ の の ML= の i SC= の 』LUCATE5。13』PRINT"PUBH START BUTTON!" 
さ 1 の IFSTRIB( の ) く >1BHTD ミ 1 の 

2 の VIEM』 TM=6 の の 』BXm14』BYm2』Fm 

ささ の FDRIm1TD F 

34 の XsRND(26)+1』YmRND (19)+1 

35 の IFSCR*(X』Y) く < う リ "BOTHS40 

355 COLORX 。Y 2 

36 の LUCATE X』Y』PRINTCHR*(199) 』 NEXT 

362 FORI=1TOD1+ML 

36 さ XsmRND(26)+1』YmRND(19) +1 

く 64 IFSCR$(X』Y) く 20 BOTU さ 6 さ 

365 LUDCATE X』YIPRINTM ま (RND(4) ) 』 NEXT 

さ 7 の BDSUB21 の の 9』BDSUB2150 

3 BUSBUB229 の 』LDCATE。21』PRINT"TIME" ITM/1 の ョ ! " 
5 の IFBTRIB( の ) =BGBDTD1 の の の 

1 の 8=STICK( の ) 

29 X=BX+(Bm2)-(Bm1) 』YmBY+(Bm 日 ) (Bm4 ) 

55 の IF X< OR X>27 DUR Y< BT 59 の 
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文 壁 の 種類 


①1 ②nT ⑳ー ④⑳ 
の 4 種類 で , と だ は それ ぞ れ N と ノ の つも 90 です 。 ② と ④ は ボー ル の 進行 方 向 を 90' 変え ま 
す 。 
① と ⑨③ は , 代 一 |] の よう に ぶつ か っ た 時 は ボー ル の 進行 方 向 を 180" 変え ます ( 来 た 方 向 に 
戻る )。 
ボー ル が , 氏 一 み ビ コ の 向き に ぶつ か っ た 場合 は , ボー ル は その まま 直進 し ます 。 
ボー ル が 台 に ぶつ か る と , 生 は 必ず 左 ( 反 時 計 ま わり ) に 45" 回 転 し ます 。 つ まり ① は ② 
に ,。②⑳② は ③ に , は ④ に , は ① に な る わけ で す 。 
文 遊び 万 
プ ブログ ラム を 走ら せる と , 
PUSH START BUTTON/ 
と 表示 る れ ま すか らら, コントローラー IT の スタ ー ト ボタ ン を 押し て くだ きる い 。 ゲ ー ム が 始ま 
る と , 画面 左下 に 残り 時 間 と 得点 が 表示 る れ ま す 。 
コン トロ ー ラ ー の 十字 ボタ ン で ボー ル の 発射 位置 を 決め 。 A ボタ ン で 発射 し ます 。 ボ ー ル 
が 発射 きれ, ゲーム ボー ド の 中 を 動き まわ っ て いる 間 は 時 間 は 減り ませ ん 。 


文 プ ログ ラム の 説明 
ボー ル の 発射 位置 を 決め る (500 一 600) 

コン トロ ー ラ ー か ら の キー 入力 を 調べ で , を それ に し た が っ て ボー ル を 移動 きせ ます 。A ボタ 
ン が 押 き る れ た ら , 1000 行 に 飛び ます 。 
@ ボ ー ル 発射 (1000 一 1050) 

ボー ル の 進行 方 向 (0 3 ) を 決め , 変数 本 に セッ ト し ます 。 
@ ボ ー ル 移動 と 衝突 (1060 一 1220) 

ボー ル を 進行 方 向 に 1 ブロ ッ ク 進 め , 何 に ぶつ か っ た か を 調べ ます 。 ぶ つか っ た 物 の コー 
ド を 変数 I に セッ ト し て 各 処 理 を 行ない ます 。 

ュー ド は 次 の と お り で す 。 

32 : 何 $ も な い 

199 : ハタ 
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ら 6 の IT=ABC(BCR 征 (X』Y) ) 

5 ら 7 の IFI<2220R 【>22780「0 ロ 9790 

SB SBX=X』GY=YI』GBHBUB22 の 0 

59 の TM=TNM-1』 IFTM く 1THENVIEM』 BOTO1 759 

6 の LOCATE の 9。21』PRINT "TIME"ITM/1 の 1" ":BUTOS の の 


1 の の の 
1 の 1 の 
1 の と の 
1 3 の 
1 の 4 の 
1 9 の 5 の 
1 の 6 
1 の 8 の 
1 の 9 の 
1 の 95 
1 1 の の 
.110 
1 1 2 の 
113 の 
114 の 
1160 
1 1 7 の 
1190 の 
12 の の 
+ ょ 210 
1 と < の 
15 の の 
151 の 
1 6 の の 
1 650 の 
1 らら 6 の 


IF 1<226GBDTD590 

IFBX= の THENH= 1 』 BHTD105 の 
IFBX=27THENH= さ 』 BHTO105 の 

IFBY= の THENH=2』 BHTD1 の 5 の 
IFSY=29THENH= ウ 』 BUTD1 の 5 の 

X=BX』Y=BYCsO 

BXmBX+(H= さ )ー(Hm1 ) 』BYmBY+ (Hm) 一 (Hm2) 』 GBDSUB220 の 
1=QABC (BCR$(8X 。BY) ) 

IF Im= さ 2BDTD1 の 6 の 

C=C+1 

IFIm199BUTD16 の の 

ITF Im=226DRT=227GBOT ロ 166 の 

ONI-2 さ 6GBOTD1 1 さ の 116 の 9』1199。121 の 

K= 切 』IF 日 MDD2= の THENH= (H+2) MOD41 BOTO15O 
BUT0155 の の 

Km2IF HH MDD2=1THENH= (H+2) MDD4』 GODTD15 の の 
BOTO15 の の 

Ks1』IF H MUD2=gTHENH=H+ 1 』 BHTD15 の の 
H=H-1 』 BDTD15 の の 

K= さ 』 IF 日 MOD2m2THEN Hm(H+ さ ) MOD41 BHTD15 の 0 
H= (H+1 ) MDD4』 BODTD15 の の 
PLAY"C9"』Km(K+1 ) MOD4 

LUCATE BX,』BY』PRINTM*(K) 』 BUTO1969 
SC=BC+Cx1』PLAY "CODE"』F=Fー1 

LOCATE SX。BY』PRINT" "』BOUBUB21 の gi IFF= の GUTH17 の 


=X1 BY=Y 22 5 
5X=X』 BY=Yi BBUB22 の 9+ BOTU5 の g RENETIgN 9 


226, 227 : 周囲 の レー ル 

237 一 240 : 礎 

壁 に ぶつ か っ た 時 の 処理 は 1120 一 1220 行 で .。 ここ で ボー ル の 新しい 進行 方 向 を 決め , ぶつ 
か っ た 回 数 (変数 C) を 1 増やし , 壁 を 回 転 き せま す (1500 行 )。 


以上 が 中 心 と な る 部 分 で この 他 に は , 

ハタ クリ ア (1600)。 1 面 ク リア (1700), ゲー ム オ ー バ ー (1750), ボー ル 表 示 (2200) な 
すく 

初期 設定 は , 100 一 380 行 で び ,。 ハタ の セッ ト は 330 一 360, 壁 の モッ ト は 362-365 行 で 。 それ 
ぞ れ 表示 位置 は 乱数 で 決め て いま す 。 

BG 画面 の デー ター を 変え る と , ゲー ム ボ ー ド の 形 を 好き な 形 に する こと が で きま す が , こ 
の 変更 を する 時 は , ハタ と 歴 の 座標 に 気 を つけ て くだ さい 。 

ハタ の 数 を 変え ん た い 人 は , 320 行 の F= 5 を , 制限 時 間 を 変え た だ た い 人 は , 320 行 の IM 三 600 
を 好き な 値 に 変え て くだ さい 。 

杏 の 数 を 変え た た い 人 は 362 行 の , 

FORI=1TO100 十 WL 

の 100 を 好き な 値 に し て くだ きい 。 多い 方 が 見 て て 楽し な り ま す が , 動き の 予想 は 難し 

〈 な わり ます 。 


文 変数 表 


SX, SY ボー ル の 位置 


は ボー ル の 進行 方 向 

C ボー ル が 壁 に ぶつ か っ た 回 数 
F ハタ の 数 

TM 残り 時 間 

PX。 PY ボー ル の スタ ー ト 位置 

SC スコ ア 

HS ハイ スコ ア 
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REFRECTION 91 


9!88 SCEcW 3 で mtmremn 


Ver.2 で は , CAME BASIC に し だ た あと, 「2 一 BG GRAPHI 
C」 を 選ん で くだ さい 。 すでに, BASIC 画面 に し て いる 場合 は ダイ レク ト 
セッ 

SYSTEM 
と する と , 選択 モー ド に な る の で , 「 2 」 の キー を 押し ます 。 (ブロ グラ ム は 
消え な い の て 安心 し て くだ さい ) 

Ver.3 で は , 電源 ON の あと , ダイ レク ト で, 

BGTOOL 
だ も し て くに なかい 。 

B G 画 面 の 書き 込み モー ド に な り ま す 。 (写真 ) 

カー ソル キー で カー ソル を 移動 し ます 。 カ ー ソ ル の 座標 は 左下 に X, Y 座 標 
で 表示 され て いま す 。 リ ター ン キ ー を 押す と カラ ー が 変り ます (9 っ つ 1 つ 2 つ 
3 っ 7 ) 右 下 に 8 つ な ら ん だ キャ ラク ター を キャ ラク ター セッ ト と 言い , これ 
は 図 一 1 の 横 一 列 に あたり ます (開始 画面 で は A 列 が 表示 ) CLR・HOME 
キー を 押す と , A つ B つ CーーM と 表示 列 が 変わ り ま す 。SHIFT キ ー と 
CLR・HOME キ ー を いっ し ょ に 押す と , M つ L 表 ーーA と 逆 に 変り ま 
呈 。 
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「DE 虐 」 キ ー を 押す と セレ クト カー ソル が 右 へ , 「INS」 キ ー を 押す と 
左 へ 移動 し ます 。 

以上 の キー を 使い 目的 の 場所 と 色 と キ ャ ラク ター を 選び スペ ー ス キー を 押す 
と ,。 その キャ ラク ター が BE する れ ま す 。 

間違え を た キャ ラク ター を 消す に は , カー ツル キー を を その キャ ラク ター の 上 に 
持っ て いき 文字 キー の 「D」 を 押す と 消え ます 。 

BG 画 面 グ デー タ は 「E 59」 の よう に 3 文字 で に な っ て いま す 。 これ は ,。 キ 
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ャ ラク ター 表 ( 図 - 1) の 「E」 列 の ナン バー「5」 ( 左 か ら 66 番目 ) の キャ 
ラク ター で て で, カラ テー は だ を いう 珍 果 て す 。 ヽ 
BG グ ラフ ィ ッ ク の 書き 込み が 終る と テー へ SAVE し ます 。 ESC キ ー 
を 押す と 画面 左上 に いく つも の 文字 が 出 て き て , その 左 に 「>」 マ ー ク が 点滅 
し よ ます 。 カー アル キー も う 。、 マ ー ク を 「ETLE」 の と ころ へ あわ せ て 
スペ ー ス キー だ 近 も ます 
LOAD か SAVE か 開い て きま すか ら 「S」 キ ー で 押す と ファ イル ネー ム 
を 開い て きま す 。 1 6 文字 以内 で ファ イル ネー ム を 入力 後 RETURN キ ー を 
押す と SAVE が 始ま り ま す 。 
この BG 画 面 の デー ター の あと に プロ グラ ム を SAVE す る と と, LOAD の 
時 便利 に な り ま す 。 
Ver.3 で は , BASTIC 画 面 上 か ら 6BG 画 面 を 呼び 出 き な く て も 直接 に BG 
還 個 デー タ を 上 6 ら AD 9AVE て きる よう に な り ま し た 。 
LOADS ーー アイ 天才 
太り 所 うこ テ テイル 吉 " 
と いう 命令 を 使い ます 。 
よ た だ た 、 友 オレ ルト て 
BCGCGET 
と 入力 する と BG 画 面 の ゲー ター が プロ グラ ム 領 域 に 転送 る きれ る の で , この あ 
と 。 
SA えり 。 ニン アオ ル 各 
と する と , プログ ラム と BG 画 面 デ ゲー ター を 一 度 に テー プ に SAVE で きま す 。 
この テー ググ と も たけ まあ に は , 
LO 衣 D テオ ル 名 
に る を 当 C20 9 
と し ます 。 こ の 「BGPUT」 は , ブロ グラ ム 上 に ある BG 画 面 デ ゲー タ を BG 
画面 に 転送 する 命令 で す 。 
な お , この 方 法 は プロ グラ ム が あま り 長 すぎ る と , 
7OM ERROR 
に な り ま す (この 本 に 入っ て いる ブロ グラ ム は 大 寺 夫 で す 。) 
この BC 画面 の 入力 に は , 「COPY」 や 「MOVE」 な どの 便利 な 入力 法 
が あり ます 。「 フ ァ ミ リー・ ベ ベーシック ・ ホ ッ プ 編 」 に くわ し い 操 作法 が 説明 き 
れ て いる の で , 参考 に し て 《 だ る さい 。 
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ブ プログ ラム が 
動か な い 時 は る ? 


プロ グラ ム を ちゃん と 打ち 込ん だ は ず な の に 動作 が お か ひし い , エラ ー・ メ ツ セ ー ジ が 出 て 
止 つ て し まう こと が あり ます 。 ご これ は , プロ グラ ム の 間違い で な い 限 り 入力 ミ ス で す 。 

SN, TM, 各 エ ラー は 入力 の タイ プ ミ ス で す 。 そ の 行 に 打ち 間違い ガ な い ガ 人 確 ガ め て ぐ 
だ さい 。 (1 し エラー の 一 部 も ) 

NF, RG, OD, UL し, DD, MO, UF(Ver.3) の エラ ー は , 入力 し な けれ ば いけ 
な い 命 令 や 行 や オペ ラン ド (LOCATE の , の の よう な お 命令 の 「 り の, り 」 に あ だ る 部 分 ) 
を 打ち 忘れ て いる か ガ , 逆 に 同じ 命令 を だ ぶつ て 2 回 入力 し て いる 時 に 起こ り ま す 。 

| し , OV, OM, SD, DZ エ ラー は , どこ か で 変数 の 値 が 予定 外 に な つて いる 事 が 多 
<, 「OV ERROR IN 259」 と 出 て も , その 原因 は , その 行 以前 に ある 場合 が ガ 多 
い の で す 。 だ と えば , 

1 り 9 A= テ 1 め 

の のり ロ テ A*A 
と いう プロ グラ ム の 19 行 を 「A= 1 9 の の り 」 と 打ち 間違う と , エラ ー は 2 行 で 発生 し ます 。 
エラ ー は 出 な いけ ど お か し な 動き を する 場合 も , どこ か で 変数 の 値 が お ひし ぐ な つて いる 

(偶然 エラ ー の 出 な い 程 度 の ) こと が ガ 多 い よう で す 。 

エラ ー を 出し だ た 変数, お ひし な 動き を する 原因 の 変数 を つき と め て , その 変数 が 出 て ぐる 
行 を 全部 確か ひめ て くだ さい 。Ver.3 で は , プロ グラ ム 中 の 文字 列 を 探す 命令 が ある の で 便利 
で す 。 

FIND /A' 
と する と プロ グラ バム 中 で 「A」 と いつ 文字 が ある 行 を 全部 表示 し て ぐれ ます 。 

ご の よう に , プロ グラ ム の 誤り や 入力 ミス を 「 パ グ 」 と こと 呼び, それ を 訂正 する こと を 「 デ プ 
バッ グ 」 と 呼 び ま す 。「 フ ァ ミ リー・ ベ ー シ ッ ク ・ ジ ャ ンプ 編 」 で は この 「 デ バッ グ 」 の 万 
法 を くわ し く 説 明 し て いま す 。 


上 上 - よ た ル 
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ソフ ト 集 


ファ ミコ ン だ けが , ゲー ム 機 じ や ゃ ない! BASIC ガ 走 る の も , フラ ミコ ン だ け じ ゃ な い 
1 プロ グラ ム を 作る 楽し さ , 自分 で 作る ゲー ム で 遊ぶ 楽し さ は , ファ ミコ ン の 数 倍 な ん 
て も の じゃ な い ぞ !! でも, BASIC で ご の よう に プロ プラ ム し だ らい い の ガ 分 びら な い 
君 に , 初歩 の ラジ オ の 革 者 の 高木 春花 を は じ め NATS の メン バー が , だ くさ ん の プロ グ 
フ ム を 提供 し ます より !! 
で は , MSX ソフ ト 集 の バー ト 1 から, ソフ ト の 内 容 を 紹介 し まし よう 。 

ー 


に は , ソフ ト 10 本 を 
掲載 し て いま す 。 


1 グレ ルッ ク (〈 ず し ホーム み デ ーー タメ ペー ス 
3. スー パー バッ クア ッ プ 4。 コン ピュ レコ ユ コー ダー 
5、 スー ラッパ ヤー メイ オス 6 の パイパー チェ イサ ー 
7. カセ モット ファ イル ズ 8. バラ ン 9. 15 ゲ ー ム 
0 や も だ CV そ 。) 「 
1 9, 10 は , TV ゲー ム な ど で 君 達 も よく 知っ て いる よね 。 
2,。 3, 4, 7 は , 実用 ジフ ト と も 言え る 物 な ん だ けど , 3 は 自分 の 作っ た プ 
ログ ラム や 友達 の ソフ ト を 借り た と き , 1 本 の テー に 何 本 も の プロ グラ ム が 記録 し て あ 
る と き な ん か に 簡単 に コピ ー し ちゃ おう と いう も の 。 4 は , MSX の CMT の LOAD 端子 
* ら 音 を メモ リー に 記録 し て 再生 し ちゃ うと いう も の な ど な ど , 盛り だ くさ ん 。 


で は , プロ グラ ム を 7 本 掲載 し て いま す 。 


1 た まえ ぇ の 文字 当て ゲー ム 2. フラ イン グ ・ ス ポッ ト 3. スロ ー コ マン ド 4. スプ ラ 
イト ヘル フッ パー 5. Combot 199X 6. MSX で アニ メー ショ ン 
ゲー ム は 1, 5 で 。 SCREEN 1 の テキ スト モー ド で グラ フィ ッ ク を や っ ちゃ お うと いう 


も の 。 な ぜ か 。 グラ フィ ッ ク モ ー ド で 作っ た ゲー ム よ り 高 
速 で す よ 。 2 は リア ル タ イ ム CG を する だ め の ユ ー テ ィ リ 
ティ ソフ ト 。 3 は プリン ター を 持っ て いな い 人 が , プロ 
グラ ム の デバ ッ グ を する と き に 。 LIST を ゆっ くり ょ 表 
示す る た め の ソ フト 。 4 は MSX の 弱点 で ある スプ ラ 
イト を , 4 つ 以 上 表示 し ちゃ うと いう スゴ イソ フト 。 
6 で は 。 MS 双 で アニ メー ショ ン を 作る に は どう し 
だ た ら よ い の か を , サン プル プロ グラ ム と 解説 を し て 
M ま V。 


で は , ソフ ト 5 本 こと 少な いで す が , 
中 身 の 濃い ソフ ト ば か り 。 


1. Wolf BOY 2. SCEIN 一 EDIT 

3 リモート ボン バー 4 コン ピュ ・ キ ー マ ヤー 
5 MSX ア ニメーション 2 

ゲー ム は この な か の 1 と 3 の 2 本 。 2 は パー ト 2 の Com 
bot と 今回 の Wolf BOY, リ モー ト ボ ン バ ー の 画面 を 
作る た だ ため の エ ディ ター で , 4 は , アマ チュ ア 無 線 と M 
SX の ドッ キン グ 。 自分 の 押し た キー が すぐ に モー 
ルス 符号 に な っ ちゃ うと いう ソフ ト 。 5 で は 前 回 に 
引き 続き MSX で アニ メー ショ ン を や ら せ る た だ ため 
の テク ニッ ク 大 公開 1! 


で は プロ グラ ム を 作っ た けど, もう少し 早 て なら 5 な いか が かな,。 な ん て 思っ て いる 
3 方 に テク ニッ ク 公 開 や 。 い ま は や り の RPG (ロー ルプ レイ ング ゲー ム ) 
を 作っ ちゃ っ た ぞ 。 な ど な か ど プ ログ ラム は も り だ くさ ん 。 5 月 下旬 に 発売 予定 
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